(31)在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Option Base l
Private Sub Command1_Click()
Dim arr(5)As String
For i=l To 5
arr(i)=Chr(Asc("A")+(i-1))
Next i
For Each b1 In arr
Print b1：
Next
End Sub
程序运行后，如果单击命令按钮，则在窗体上输出的内容为________。
A)ABCDE　　B)abcde　　C)出错信息　　D)1 2 3 4 5
答案：A
评析：语句Chr(Asc("A")+(i-1))的作用是将字符A的ASCII码值加上循环变量的值减1，求出此ASCII码对应的字符。将计算出的字符赋值给数组arr的第i个元素。循环结束后，arr的5个元素分别为字符A、B、C、D、E。Print方法输出项的最后用分号结束，使得输出不换行。 

(11)不能触发滚动条Change事件的操作是__________。
A)拖动滚动条中滑块
B)单击滚动条中滑块
C)单击滚动条两端箭头
D)单击箭头与滑块之间的滚动条
答案：B
评析:单击滚动条中滑块不会引起ScrollBar控件的Value属性值的变化，故不能触发Change事件。

(12)下面的四个VB6.0表达式语法正确的是__________。
A)a>b．find．b<>c　　B)a>b c　　　 C)a>b AND<>c　　 D)a>b AND b<>c
答案：D
评析：选项A的"与"运算符多了两个句点。选项B在变量b与c之间无运算符。选项c是关系运算符与逻辑运算符连用，它们都是错误的。选项D先计算关系表达式a>b和b<>c，然后再将两个逻辑值进行"与"运算。

(13)骰子是一个正六面体，用1-6这六个数分别代表这六面，掷一次骰子出现的数可表示　　为__________。
A)INT(RND(6)+1)　　B)INT(RND*6)
C)INT(RND*7)　　　 D) INT(RND*6+1)
答案：D
评析：RND函数产生一个小于1，大于等于0 的随机数，1NT函数是求不大于参数的最大整数。选项A的最大数是l，选项B的最大数是5，选项c的最小数是0，只有选项D能产生1-6之间的整数。

(14)Prim方法可以输出多个表达式，若使用标准格式输出，各表达式的分隔符应是__________。
A)空格　　B)逗号　　C)冒号　　D)分号
答案：B
评析：Prim方法中，使用紧凑格式输出，各表达式的分隔符应是分号，使用标准格式输出，各表达式的分隔符应是逗号。

(15)编写如下事件过程：
Private Sub Form_Click()
K=2
If k>=l Then A=3
If k>=2 Then A=2
If k>=3 Then A=I
Prim A
End Sub
程序运行后，单击窗体，输出的结果为__________。
A)1　　B)2　　C)3　　 D)出错
答案：B
评析：单击窗体后，变量k值为2。由于Form_Click()过程中有3个与k有关的单行If语句，故A的值取决于能执行为A赋值的最后一条If语句，即Ifk>=2 Then A=2。因此输出为2。

(16)不能作为容器使用的对象是__________。
A)窗体　　B)框架　　C)图片框　　D)图像框
答案：D
评析：窗体、框架和图片框都可以作为容器使用，在这些对象中可以放置其它控件。图像框不能放置其它控件，不能作为容器使用。

(17)以下关于图片框控件的说法中，错误的是__________。
A)可以通过Print方法在图片框中输出文本
B)清空图片框控件中图形的方法之一是加载一个空图形
C)图片框控件可以作为容器使用
D)用Stretch属性可以自动调整图片框中图形的大小
答案：D
评析：图片框控件不提供滚动条，也不能伸展被装入的图形以适应控件尺寸，但可以用图片框的Autosize属性调整图片框大小以适应图形尺寸，所以选项D是错误的。

(18)以下叙述中错误的是__________。
A)下拉式菜单和弹出式菜单都用菜单编辑器建立
B)在多窗体程序中，每个窗体都可以建立自己的菜单系统
C)除分隔线外，所有菜单项都能接收Click事件
D)如果把一个菜单项的Enabled属性设置为False，则该菜单项不可用
答案：C
评析：PopupMenu方法的使用形式如下：[对象]PopupMenu菜单名，标志，x，y。其中，x，y：是快捷菜单显示的位置。标志：指定快捷菜单的行为。当标志为0时，快捷菜单中的项只能对鼠标左键起反应。当标志为l时，快捷菜单中的菜单项对鼠标左键和右键都反应；标志为2时PopupMenu方法只能用在MouseDown事件过程，所以选项C是错误的。