《入境货物报检单》中“贸易国别（地区）”与“启运国家（地区）”的内容应当一致。（）此题为判断题(对，错)。

有如下事件过程： 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 Commandl_Click()

Do Until b a＝In put Box("输入a的值")

a＝Val(a)

b＝Input Box("输入b的值")

b=Val(b)

a=a＋b

Loop

Print a

End Sub

程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【 】。

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Commandl_Click()

DO Until b<0

a=InputBox(”输入a的值”)

a=Val(a)

b=InputBox(”输入b的值”)

b=Val(b)

a=a＋b

Loop

Print a

End Sub

程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【 】。

有下列事件过程：

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 End Sub程序运行后，依次输入数值30，20，10，-1后，输出结果是。A. 6000 B. -10 C. 200 D. -6000

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() s=1 Do s=(s + 1) * (s + 2) Number=Number + 1 Loop Until s＞ = 30 Print Number，s End Sub 程序运行后，输出的结果是

A．2 3

B．2 56

C．5 12

D．10 20

在窗体上画一个命令按钮(名称为 Commandl)，然后编写如下事件过程： Private Sub Commandl_Click() Static a As Integer a＝a+1 End Sub 运行程序，第3次单击命令按钮后，变量a的值为()

A．0

B．1

C．2

D．3

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() a：InputBox("Enter the First Integer") b：InputBox("Enter the Second Inteeer") Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是 ()

A．579

B．123

C．456

D．123456

窗体有命令按钮Commandl和文本框Textl，对应的事件代码如下：

Private Sub Commandl_Click()

For i=1 To 4

x=3

For j=l to 3

For k=1 To 2

x=x+3

Next k

Next j

Next i

Textl．Value=Str(x)

End Sub

运行以上事件过程，文本框中的输出是()。

A．6

B．12

C．18

D．21

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commandl_click() Dim num As Integer num=1 Do Until num＞6 Print num； num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。

A．13.45.8

B．1 3 5

C．147

D．无数据输出