单项选择题

在窗体中添加一个名称为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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体中添加一个名称为Command1的命令按钮，编写如下事件代码： Private Sub Command1_Click() a=75 If a＞60 Then g=1 Else If a＞70 Then g=2 Else If a＞80 Then g=3 Else If a＞90 Then g=4 End If MsgBox g End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是( )。
A．1
B．2
C．3
D．4
单项选择题
在窗体中有一个标签Lable1，标题为“测试进行中”，有一个命令按钮Command1，事件代码如下： Prviate Sub Command1_CIick() Lable1.Caption= 标签 End Sub Private Sub Form_Load() Form．Caption= 举例 Command1．Caption= 移动 End Sub 打开窗体后，单击命令按钮，屏幕显示( )。
相关试题