有如下事件过程： Private Sub Command1_Click() b=10 Do Until b =-1 a = InputBox("请输入a的值") a = Val(a)b = InputBox("请输入b值") b = Val(b)a=a*b Loop Print a End Sub 程序运行后，依次输入数值30，20，10，-1后，输出结果为( )。

A．6000

B．-10

C．200

D．-6000

[单选题]有如下事件过程： Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A)b=InputBox("请输入b的值") b=Val(B)a=a * b Loop Print aEnd Sub程序运行后，依次输人数值30，20，10，-1，输出结果为A．6000B．-10C．200D．-6000

[单选题]有如下事件过程： Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A) b=InputBox("请输入b的值") b=Val(B) a=a*b Loop Print a End Sub 程序运行后，依次输入数值30，20，10，-1后，输出结果为( )。A．6000B．-10C．200D．-6000

[试题]假设有如下事件过程：Private Sub Command1_Click()msg1$="Are You Continue to?"msg2$="Open The Books"r=MsgBox(msg1$，34，msg2$)E．nd Sub运行该程序后，所出现的对话框的标题是[ ]。

[单选题]假定有如下的窗体事件过程： Private Sub Command1_Click() a$="Microsoft Visual Basic" b$=Riqht(a$, 5) c$=Mid(a$, 1, 9) MsgBox a$, 34, b$, c$, 5 End Sub 程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是______。A．Microsoft VisualB．MicrosoftC．BasicD．5

[单选题]有如下程序:Private Sub Command1_Click()a$="A WORKER IS HERE"x=Len(a$)F．or i=1 To x - 1b$=Mid$(a$, i, 3)If b$="WOR" Then S=S + 1NextPrint SE．nd Sub单击命令按钮，程序运行结果为A．1B．2C．3D．5

[单选题]有如下程序：Private Sub Command1_Click()a$="A WORKER IS HERE"x=Len(a$)F．or i=1 To x-1b$=Mid$(a$，i，3)If b$="WOR"，Then S=S+1NextPrint SE．nd Sub单击命令按钮，程序运行结果为AA．1B．2C．3D．5

[单选题]有如下程序。Private Sub Command1_Click()D．im a As SingleD．im b As Singlea=5: b=4C．all Sub1(a, b)E．nd SubSub Sub1(x As Single, y As Single)t=xx=t / yy=t Mod yE．nd Sub在调用运行上述程序后,a和b的值分别为A．0 0B．1 1C．2 2D．1 2

[单选题]有如下程序： Private Sub Command1_Click() a$="A WCIRKER IS HERE" x=Len(a$) For i=1 To x-1 b$=Mid$(a$,i,3) If b$="WOR"Then S=S+1 Next Print S End Sub 单击命令按钮，程序运行结果为A．1B．2C．3D．5

[单选题]有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t/Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为A．0 0B． 1 1C．2 2D．1 2

[单选题]有如下程序： Private Sub Command1_Click() as="A WORKER IS HERE" x = Len(a$) For i=1 To x - 1 b$ =Mid$(a$, i,3) If b$ ="WOR" Then S=S+ 1 Next Print S End Sub 单击命令按钮，程序运行结果为A．1B．2C．3D．5