(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循环