单项选择题

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

A．600
B．-10
C．200
D．-6000

<上一题目录下一题>

热门试题

单项选择题

下列程序运行时输出的结果是( )。 Option Base 1 Const a=10 Private Sub Form_Click0 Dim x(a)As Integer k=-1 For i=1 To a x(i)=i*k k=(-1)*k Next i For i=1 To 10 Print x(i) Next i End Sub

A．1 3 5 7 9 10
B．-1-3-5-7-9
C．-1 2-3 4-5 6-7 8-9 10
D．1-2 3-4 5-6 7-8 9-10

单项选择题

窗体上有一个列表框和一个文本框，编写下列两个事件过程： Private Sub Form. Load() List1.AddItem 北京 List1. AddItem 天津 List1. AddItem 上海 Text1. Text= End Sub Private Sub List1. Click() Print Text1. Text+List1. Text End Sub 程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是( )。

A．中国北京
B．中国天津
C．中国上海
D．北京中国

相关试题