在窗体上画一个命令按钮，然后编写下列程序 Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x； End Sub 程序运行后，单击命令按钮，输出结果为

A．2 3 4

B．2 5 9

C．3 5 4

D．2 4 3

[单选题]在窗体上画一个命令按钮，然后编写下列程序 Private Sub Command3_Click() Tcl 2 Tcl 3 Tcl 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x+a Print x; End Sub 程序运行后，单击命令按钮，输出结果为A．2 3 4B．2 5 9C．3 5 4D．2 4 3

[单选题]在窗体上画一个命令按钮，然后编写下列程序： Private Sub Command1 click( ) Dim a As Single，b As Single a=6:b=2 RC a，b Print a，b End Sub Sub RC(x As Single，y As Single) i=x x=i/y y=i Mod y End SubA．4 3B．1 1C．3 0D．2 6

[单选题]在窗体上画一个命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer, b As integer b = 1 For a = 1 To 100 If b ＞＝ 10 Then Exit For If b Mod 3 = 1 Then b = b + 3 End If Next a Print a End Sub 在命令按钮上单击后，窗体上显示的结果是 ______。A．101B．6C．5D．4

[单选题]在窗体上画一个命令按钮Command1，然后编写下列代码：Private Sub Command1_Click()D．im Arr1(10) As Integer,Art2(10) As Integern=3F．or i=1 To 5A．rr1(i)=iA．rr2(n)=2*n+iNext iPrint Arr2(n);Arr1(n)E．nd Sub运行程序后，单击命令按钮，输出结果是( )。A．11 3B．3 11C．13 3D．3 13

[单选题]在窗体上画一个命令按钮，然后编写如下程序 Private Sub Command1_Click( ) Dim a As Integer，b As hiteger a=1 b=2 Print N(a，B)End Sub Function N(x As Integer，y As Integer)As Integer N=IIf(x>y，x，y) End Function 程序运行后，单击命令按钮，输出结果为A．1B．2C．5D．8

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写下列程序：Private Sub Command1_Click()F．or i=1 To 2F．or j=1 To iPrint String(i,"Hello")Next jPrintNext iE．nd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A)B)C)D．)HA．H HH HHB．H HHHHC．HHHHD．H

[单选题]在窗体上画一个命令按钮，然后编写如下代码： 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_Click( ) Dim a AS Integer，b As Integer a=15 b=2 t N(a，B)End Sub Function N(x As Integer，y As Integer) As Integer N=IIf(x)y，x，y) End Function 程序运行后，单击命令按钮，输出结果为A．1B．2C．15D．8

[单选题]在窗体上画一个命令按钮，然后编写如下程序： Private Sub Comrnand3_Click( ) Cop 2 Cop 3 Cop 4 End Sub Sub Cop (a As Integer) Static x As Integer x=x + a Print x; End Sub 程序运行后，单击命令按钮，输出结果为A．2 3 4B．2 5 9C．3 5 4D．2 4 3