更多"在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码"的相关试题:
[填空题]单击窗体上的命令按钮Command1, 【10】
Private Sub Command1_Click（ ）
a= "10"
b=20
c=Val(a) +b
Print c
End Sub
[单项选择]在窗体中添加一个名为Command1的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click( )
a＝75
If a＞60 Then
k＝1
ElseIf a＞70 Then
k＝2
ElseIf a＞80 Then
k＝3
ElseIf a＞90 Then
k＝4
EndIf
MsgBOx k
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是______。
A. 1
B. 2
C. 3
D. 4
[填空题]在窗体中添加一个命令按钮，然后编写如下代码：
Private Sub Command1_Click（ ）
a＝InputBox("请输入一个整数")
b＝InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入21和45，输出结果为 【10】 。
[填空题]在窗体中添加一个命令按钮，然后编写如下代码：
Private Sub Command1_Click（ ）
a＝InputBox("请输入一个整数")
b＝InputBox("请输入一个整数")
Print Val(a)+Val(b)
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入21和45，输出结果为 【10】 。
[单项选择]在窗体中添加一个命令按钮，然后编写如下代码：
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（ ）
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
运行窗体后，单击命令按钮，消息框的输出结果是______。
[填空题]在窗体上添加一个命令按钮Command1，然后编写如下事件过程。
Private Sub Command1_Click（ ）
Dim b，k
For k=1 To 6
b=23+k
Next k
MsgBox k+b
End Sub
打开窗体后，单击命令按钮，消息框数据的结果是______。
[填空题]在窗体中添加一个名为Command1的命令按钮，然后编写如下程序：
Private Sub s(By Val p As Integer)
p=p*2
End Sub
Prirate Sub Command1_Click( )
Dim i As Integer
i=3
Call s(i)
If i＞4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
[填空题]在窗体中添加一个命令按钮Command1和一个文本框Text1，编写如下代码：
Private Sub Command1_Click（ ）
Dim x As Integer，y As Integer，z As Integer
a=5，b=10，c=0
Me!Text1=" "
Call p1(a,b,c)
Me!Text1=12
End Sub
Sub pl(XxAs Integer，y As Integer，z As Integer)
z=x+y
End Sub
程序运行后，文本框中应显示的内容为______。
[填空题]在窗体上添加一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click（ ）
sum=0
For i=3 To 7
sum=i+2
Next i
MsgBox sum+i
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是______。
[单项选择]
窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Sub Command1_Click（ ）
Dim a As Integer, b As Integer
a=8
b=12
Print fun(a, b); a; b
End Sub
Private Function Fun(ByVal a As Integer, b As Integer)As Integer
a=a Mod 5
b=b/5
Fun=a
End Function
程序运行时，单击命令按钮，则输出结果是（）。
A. 3 3 2
B. 3 8 2
C. 8 8 12
D. 3 8 12
[填空题]在窗体上添加一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click（ ）
Sum =0
For i=3 T0 7
Sum =i+2
Next i
MsgBox sum+i
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是______。
[填空题]在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：
Private Sub Command1_Click( )
Dim s,i
For i=1 To 10
S=S+i
Next i
MsgBox s
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
[单项选择]
窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Command1_Click（ ）
Dim m As Integer , n As Integer
m=InputBox(“输入第一个数”)
n=InputBox(“输入第二个数”)
Do While m<>n
Do While m>n
m=m-n
Loop
Do While n>m
n=n-m
Loop
Loop
Print m
End Sub
该程序的功能是（）。
A. 求数值m和n的最大公约数
B. 求数值m和n的最小公倍数
C. 求数值m和n 中的较大数
D. 求数值m和n中的较小数
[填空题]在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：
Private Sub Command1_Click（ ）
Dim S, i
For i=1 To 10
S=S+i
Next i
MsgBox S
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
