在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub sl() x=x+20 End Sub Private Sub s2() Dim x As Integer x=x+20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
A.10
B.30
C.40
D.50
第1题:
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
36
第2题:
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click()
sum=0
For i=1 To 100 step 2
Next i
MsgBox sum
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
第3题:
在窗体上添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub f(ByVa1 x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(1)
If i>4 Then i=i*2
MsgBox i
End Sub
打开窗体运行后,单击命令按钮,则消息框的输出结果为______。
第4题:
在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:
窗体打开运行后,单击命令按钮,则消息框的输出结果为__________。
第5题:
在窗体中添加一个名称为Coml的命令按钮,然后编写如下程序:
第6题:
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub f(ByVal x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(i)
If i>4 Then i=i*2
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
第7题:
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x+20 End Sub Private Sub s2() Dim x As Integer x=X+20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
A.10
B.30
C.40
D.50
第8题:
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click()
Dim s,i
For i=1 To 10
s=s+i
Next i
MsgBox s
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为 。
55
第9题:
A、33
B.34
C.3
D.3
第10题:
( 11 )在窗体中添加一个命令按钮,名称为 Command1 ,然后编写如下程序:
Private Sub Command1_Click()
Dim s , i
For i=1 To 10
s=s+i
Next i
MsgBox s
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为 【 11 】 。