(15)以下能从字符串"VisualBasic"中直接取出子字符串"Basic"的函数是。
A．Left
b．Mid
C．String
D．Instr
(16)设a=4，b=3，c=2，d=1，下列表达式的值是。
a>b+1 Or c< Mod b And>
A．True
B．1
C．-1
D．0
(17)以下可以作为Visual Basic变量名的是。
A．A#A
B．counstA
C．3A
D．?AA
(18)设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是。
A．Print A=x+y
b．Print"A=";x+y
C．Print "A="+Str(x+y)
D．Print"A="&x+y
(19)假定有如下的命令按钮(名称为Command1)事件过程：
Private Sub Command1_Click()
x=InputBox("输入："，"输入整数")
MsgBox"输入的数据是：”，，”输入数据："+x
End Sub
程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是。
A．x的值是数值10
B．输入对话框的标题是“输入整数”
C．信息框的标题是“输入数据：10”
D．信息框中显示的是“输入的数据是：”
(20)在窗体上画1个命令按钮(名称为Command1)和1个文本框(名称为Text1)，然
后编写如下事件过程：
Private Sub Command1_Click()
x=Val(Text1.Text)
Select Case x
Case 1，3
y=x*x
Case Is>=10，Is<=-10
y=x
Case -10 To 10
y=-x
End Select
End Sub
程序运行后，在文本框中输入3，然后单击命令按钮，则以下叙述中正确的是。
A．执行y=x*x
b．执行y=-x
C．先执行y=x*x，再执行y=-x
D．程序出错
(21)设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(30)As Integer
For i=1 To 30
a(i)=Int(Rnd*100)
Next
For Each arrItem In a
If arrItem Mod 7=0 Then Print arrItem；
If arrItem>90 Then Exit For
Next
End Sub
对于该事件过程，以下叙述中错误的是。
A．a数组中的数据是30个100以内的整数
B．语句For Each arrItem In a有语法错误
C．If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数
D．If arrItem>90……语句的作用是当数组元素的值大于90时退出For循环
责任编辑：cyth
