在窗体上画一个命令按钮，然后编写如下程序： Sub S1(ByVal x As Integer,ByVal y As Integer) Dim t As Integer t=x x=y y=t End Sub Private Sub Command1_Click() Dim a As Integer,b As Integer a=10 b=30 S1 a，b Print"a="；a；"b="；b End Sub 程序运行后，单击命令按钮，输出结果是 ______。

A．a=30 b=10

B．a=30 b=30

C．a=10 b=30

D．a=10 b=10

[单选题]在窗体上画一个命令按钮，然后编写如下程序： Sub S1(ByVal x As Integer,ByVal y As Integer) Dim t As Integer t=x x=y y=t End Sub Private Sub Command1_Click() Dim a As Integer,b As Integer a=10 b=30 S1 a，b Print"a="；a；"bc"；b End Sub 程序运行后，单击命令按钮，输出结果是： ______。A．a=30 b=10

[单选题]在窗体上画一个命令按钮，然后编写如下程序：Sub S1(ByVal x As Integer, By Val y As Integer) Dim t As Integer t=x x=y y=tEnd SubPrivate Sub Command1_ Click() Dim a As Integer, b As Integer a=10 b=30 S1 a，b Print "a="；a="b="；bEnd Sub 程序运行后，单击命令按钮，输出结果是______。A．a=30 b=10B

[单选题]在窗体上画一个命令按钮，然后编写如下程序： Sub S1(By Val x As Integer, By Val y As Integer) Dim t As Integer t=x x=y y=r End Sub Private Sub Command1_Click() Dim a As Integer, b As Integer a=10 b=30 S1 a，b Print"a=";"b=";b End Sub 程序运行后，单击命令按钮,．输出结果是______。A．a=30 b=1

[单选题]在窗体上画一个命令按钮，然后编写如下程序： Function funl(ByVal Bum As Long)As Long Dim k As Long k = 0 Bum=Abs(Bum) Do While Bum k=k+(Bum Mod 10) Bum=Bum/10 Loop fun1=k End Function Private Sub Command1_Click() Dim n As Long n=InputBox("请输入一个数") Print fun1(n) End Sub 程

[单选题]在窗体上画一个命令按钮，然后编写如下程序： 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

[单选题]在窗体上画一个命令按钮，然后编写如下程序： 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

[单选题]在窗体上画一个命令按钮，然后编写如下程序 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

[单选题]在窗体上画一个命令按钮，然后编写如下程序：privatesubcommand1_click()forj=1to11j=j+1n=n+1nextjPrint"n=";nendsub程序运行后单击命令按钮，N的值是( )A．5B．6C．10D．11

[单选题]（29）在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )D．im I, NumRandomizeD．oF．or I=1 To 1000Num=Int(Rnd*100)Print Num;Select Case NumC．ase 12E．xit ForC．ase 58E．xit DoC．ase 65, 68, 92E．ndE．nd SelectNext ILoopE．nd Sub上述事件过程执行后，下列描述中正确的是（ ）。A．）Do 循环执