更多"窗体上命令按钮Commandl的事件过程如下： Private Sub"的相关试题:
[单项选择]单击窗体上Commandl命令按钮时，执行如下事件过程：
Private Sub Commandl＿Click（ ）
a$="Software and hardware"
b$=Right(a$，8)
c$=Mid(a$，l，8)
Msgbox a$，，b$，c$，l
EndSub
则在弹出的信息框的标题栏中显示的信息是( )。
A. software andhardware
B. software
C. hardware
D. l
[填空题]窗体上命令按钮Commandl的事件过程如下：
Private Sub Command1_Click（ ）
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
s=x
End Function
运行程序，第3次单击命令按钮Command1时，输出结果为【 】。
[填空题]窗体上命令按钮Commandl的事件过程如下：
Private Sub Command1_Click（ ）
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
s=x
End Function
运行程序，第3次单击命令按钮Command1时，输出结果为 【7】 。
[填空题]在窗体上添加一个命令按钮(名为Commandl)，然后编写如下事件过程：
Private Sub Command 1_Click（ ）
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是______。
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl Click（ ）
Dim a（ ）
a＝Array(1，3，5，7)
s=O
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 Commandl_Click（ ）
DO Until b<0
a=InputBox(”输入a的值”)
a=Val(a)
b=InputBox(”输入b的值”)
b=Val(b)
a=a＋b
Loop
Print a
End Sub
程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【15】。
[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl—Click（ ）
x=InputBox(“请输入一个整数”)
Print x+345
End Sub
程序运行后，单击命令按钮，在输入对话框中输入123，则在窗体上输出的内容为( )
A. 123345
B. 468
C. 123
D. 345
[单项选择]在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（ ） Dim al(4,4),a2(4,4) Dim i As Integer,j As Integer For i=1 To 4 For j=1 To 4 a1(i,j)=i+j a2(i,j)=a1(i,j)+i+j Next j Next i Print al(3,3);a2(3,3) End Sub 程序运行后，单击命令按钮，在窗体上输出的是______。
A. 6 6
B. 10 5
C. 7 21
D. 6 12
