VISUAL BASIC模拟试题题库
本试题来自：（2008年VISUAL BASIC模拟试题，）一、选择题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_ Click()
Dim Arr(3, 3) As Integer
For i = 1 To 3
For j = 1 To 3
If j = i Or j = 3 - i + 1 Then
Arr(i, j) = 1
Arr(i, j) = 0
Print Arr(1, 1) + Arr (2, 2) + Arr (3, 3)
End Sub程序运行后，单击命令按钮，输出结果为______ 。A．0B．1C．2D．3正确答案：有， 或者
您可能感兴趣的试题
单项选择题：（)在窗体上有一个名称为List1的列表框和一个名称为Command1的命令按钮，并编写有如下事件过程：
Private Sub Form_Load()
List1.AddItem "Item1":List1.AddItem"Item2":List1.AddItem"Item3"
Private Sub Command1_Click()
List1.List(List1.ListCount)="New Item"
程序执行时，单击命令按钮，其结果为(
)。A．把字符串“New Item”添加到列表框中，但位置不能确定B．把列表框中原有的最后一项改为“New Item”C．把字符串“New Item”添加到列表框的最后(即“Item3”的后面)D．把字符串“New Item”插入到列表框的最前面(即“Item1”的前面)答案：有，答案解析：有，单项选择题：（)在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序(
Private Type student
StuName As String * 10
StuGrade As String * 10
StuAge As Integer
Private Sub Form Click()
Dim s As student
Open "c:\student.txt"For Random As#1 Len=Len(s)
For i=1 To 5
s.StuName=InputBox("请输入姓名")
s.StuGrade=InputBox("请输入年级号")
s.StuAge=Val(InputBox("请输入年龄"))
End SubA．Print #1,sB．Print #1,iC．Put #1,,sD．Put #1,i答案：有，答案解析：有，
VISUAL BASIC模拟试题最新试卷
VISUAL BASIC模拟试题热门试卷窗体和命令按钮 标签和文本框 单选按钮、复选框和框架 定时... 内容详..
扫扫二维码，随身浏览文档
手机或平板扫扫即可继续访问
窗体和命令按钮 标签和文本框 单选按钮、复选框和框架 定时...
举报该文档为侵权文档。
举报该文档含有违规或不良信息。
反馈该文档无法正常浏览。
举报该文档为重复文档。
推荐理由：
将文档分享至：
分享完整地址
文档地址：
粘贴到BBS或博客
flash地址：
支持嵌入FLASH地址的网站使用
html代码：
&embed src='/DocinViewer-4.swf' width='100%' height='600' type=application/x-shockwave-flash ALLOWFULLSCREEN='true' ALLOWSCRIPTACCESS='always'&&/embed&
450px*300px480px*400px650px*490px
支持嵌入HTML代码的网站使用
您的内容已经提交成功
您所提交的内容需要审核后才能发布，请您等待！
3秒自动关闭窗口}