在窗体中添加一个名称为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 窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
- A10
- B30
- C40
- D50
在窗体中添加一个名称为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 窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
解析: 本题考查变量作用域的知识。在整个程序中定义了一个全局变量x,在命令按钮的单击事件中对这个x赋值为10,然后依次调用s1和s2;在s1中对x自加了20;在s2中用Dim定义了一个局部变量x,按照局部覆盖全局的原则,在s2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为30。
1、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim c As Integer,n As IntegerFor c=0 T...
2、在窗体上画一个名称为Command1的命令按钮,一个名称为Label1、L
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1、Label2、Label3的标签,然后编写如下的事件过程:Private x As Integer Private Sub Command1_Click()Static...
3、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10,10)As IntegerDim I,j As...
4、在窗体上画一个名称为Command1的命令按钮,一个名称为Label1、L
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1、Label2的标签,然后编写如下的事件过程:Private x As Integer Private Sub Command1_Click()x = 5: y =...
5、在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下的事件过程: Private Sub Command1_Click()s = 0For i = 0 To 15X = 2 * i - ...
6、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As I...