在窗体中添加一个命令按钮，然后编写如下代码： Private Sub Command1_Click( ) For i=l To 4 x=4 For j=1 To 3 x=3 For k=l To 3 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，输出结果是

A．7

B．15

C．21

D．538

[单选题]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1 Click() a&＝InputBox("请输入第一个数") b&=InputBox("请输入第二个数") Print b&+a& End Sub 程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是A．66666B．5432112345C．1.23455e+009D．出错

[单选题]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_Click() 0pen "d：/vb/test.txt "For Input As #1 Print LOF(1) Close #1 End Sub 假设文件d:/vb/test.txt的内容为I am a student．，那么程序运行后，单击命令按钮，其输出结果为______.A．13B．14C．15D．16

[单选题]在窗体中添加一命令按钮，并在命令按钮中编写如下代码： Private Sub Commandl_C1ick() Dim a As Single a=-1.234567 b=Int(A)c=Sgn(A)d＝Abs(A)e=Fix(A)If a＜b Then Print b： If a＜c ThenPrint c； H a＜d ThenPrint d； H a＜e Then Print e; Print End sub 运行后输出结果是 ( )A．-2 -1 1.234 567 -1B．-2 1.2

[单选题]在窗体上有一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()D．im a(5) As StringF．OR i=1 To 5a(i) =Chr(Asc("A") +(i-1))NextF．or Each b In aPrint b；NextE．nd Sub程序运行后，单击命令按钮，输出结果是A．ABCDEB．1 2 3 4 5C．abcdeD．出错信息

[单选题]在窗体上有一个命令按钮，然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox("enter the first integer") b=InputBox("enter the second integer") Print b + a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入“2”和“6”，则输出结果为A．2B．62C．8D．26

[单选题]在窗体上有一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click() Dim a(5)As String FOR i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next For Each b h a Print b； Next End Sub 程序运行后，单击命令按钮，输出结果是A．ABCDEB．1 2 3 4 5C．abcdeD．出错信息

[单选题]在窗体上面一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()MsgBox Str(123+321)E．nd Sub程序运行后，单击命令按钮，则在信息框中显示的提示信息为A．字符串“123+321”B．字符串“444”C．数值“444”D．空白

[单选题]在窗体上画一个命令按钮，然后编写如下事件过程：private sub command1_click()dima,basintegera=Val(inputbox("EntertheFirstinteger"))b=Val(inputbox("EntertheSecondinteger"))Printb+aend sub程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和111，则输出结果是( )A．456B．111C．567D．111456

[主观题]在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()D．im Y as StringX=5Y=X & Space(3) & XPrint X；Print Trim(Y)；Len(Trim(Y))E．nd Sub该程序的执行结果是[ ]。

[单选题]在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()D．im I，NumRandomizeD．oF．or I=1 To 1000Num=Int(Rnd*100)PrintNum；SelectCase NumC．ase 12E．xit ForC．ase 58E．xit DoC．ase 65，68，92E．ndE．nd SelectNextILoopE．nd Sub上述事件过程执行后，下列描述中正确的是A．Do循环执行的次数为1000次B．在For循