更多"在窗体上画一个命令按钮，然后编写下列程序： Private Sub "的相关试题:
[单项选择]在窗体上画一个命令按钮，然后编写如下程序
Private Sub Command4 Click（ ）
Dim a As Integer，b As Integer
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. l
B. 2
C. 5
D. 8
[单项选择]在窗体上画一个命令按钮，然后编写下列程序：
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 Sub
程序运行后，输出的结果为( )。
A. 4 3
B. 1 1
C. 3 0
D. 2 6
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click（ ） Dim a（ ） a=Array(1,3,5,7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮，然后编写如下代码：
Private Sub Command1 Click（ ）
a&＝InputBox("请输入第一个数")
b&=InputBox("请输入第二个数")
Print b&+a&
End Sub
程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是
A. 66666
B. 5432112345
C. 1234554321
D. 出错
[单项选择]在窗体上画一个命令按钮，然后编写如下程序：
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. 内联函数
B. 重载函数
C. 递归函数
D. 嵌套函数
[单项选择]在窗体上画一个命令按钮，然后编写下列程序：
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. ResultSet
B. Connection
C. Statement
D. 以上都不是
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command_Click( )
S=0
Do
s=(s + 1) * (s +2)
Number=Number+1
Loop Until S＞=30
Print Number，S
End Sub
程序运行后，输出的结果是( )。
A. SELECT
B. CREATE
C. ALTER
D. DROP
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
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
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click（ ） Dim a（ ） a=Array(1，3，5，7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。
A. 135
B. 357
C. 531
D. 753
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click（ ）
x=0
Do Until x=-1
a=InputDox("请输入a的值")
a=Val(
A. 13
B. 12
