计算机二级
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Public x As IntegerPrivate Sub Command1_Click()Dim y As Integerx=10 : y=5Call f(x, y)Print x; yEnd SubPrivate Sub f(x1 As Integer, y1 As Integer)x1=x+2y1=y+2End Sub程序运行后,单击命令按钮,在窗体上显示的内容是( )。A. 10 5B. 12 7C. 12 2D. 以上都不对
题目
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Public x As Integer
Private Sub Command1_Click()
Dim y As Integer
x=10 : y=5
Call f(x, y)
Print x; y
End Sub
Private Sub f(x1 As Integer, y1 As Integer)
x1=x+2
y1=y+2
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是( )。
A. 10 5
B. 12 7
C. 12 2
D. 以上都不对
相似问题和答案
第1题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x*x+y*y End Sub Private Sub Command1_Click() Dim a As Integer a=8 Call subl(1, 2,a) Print a End Sub 程序运行后，单击命令按钮，则窗体下显示的内容是______。
A．8
B．2
C．5
D．11
解析：因为Subl过程的形参都是传值传送，所以在其内的所有计算结果都不将返回，并不影响对应的实参值，变量a的值并没有改变，仍然是8。
第2题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim x As Integer Static y As Integer Cls x=x+5 y=y+3 Print x,y End Sub 程序运行时，两次单击命令按钮Command1后，窗体显示的结果是( )。
A．10 6
B．5 6
C．5 3
D．10 3
第3题：
在窗体上画一个名称为Command1的命令按钮和3个名称为Labe11、Labe12、LabeD的标签，然后编写如下程序段：
Private x AS Integer
Private Sub Command1_Click()
Static y AS Integer
Dim z As Integer
n=10
z=n+z
y=y+z
X=X+Z
Labell．Caption=x
Label2．Caption=y
Label3．Capt&on=z
End Sub
运行程序，连续3次单击命令按钮后，则3个标签中显示的内容是【 】。
30、30、10 解析：本题考查考生对数组说明的理解，用Dim和Static关键字可以声明过程级变量，过程级变量只有在声明它们的过程才能被识别。在整个应用程序运行时，用Static声明的变量中的值一直存在，而用Dim声明的变量只在过程执行期间才存在。Dim语句还可以声明模块级变量，其作用域为声明它的窗体模块或标准模块中。本题中变量x是用Dim声明的模块级变量，变量y是用Static声明的过程级变量，而变量z是用Dim声明的过程级变量。第1次单击命令按钮后，3个标签中分别显示10、10、10；第2次单击命令按钮后，3个标签中分别显示20、20、10；第3次单击命令按钮后，3个标签中分别显示30、30、10。
第4题：
在窗体上画一个命令按钮，然后编写如下程序(假定变量x是—个窗体级变量)
Dim x As Integer
Sub inc(a AS Integer)
X=K+a
End Sub
Private Sub Command1_Click()
inc2
inc3
inc4
Prmt x；
Ead Sub
程序执行后，单击Command1命令按钮，输出的结果是【 】。
9 解析：inc函数每执行一次就向x上累加一次传入的参数，所以最后x的值为：2+3+4=9。
第5题：
在窗体上画一个命令按钮，然后编写如下程序：
Dim x As Integer
Sub inc(a As Integer)
x=x+a
End Sub
Private Sub Command1_Click()
inc 2
inc 3
inc 4
Msgbox x；
End Sub
程序执行后，单击Command1命令按钮，消息框显示结果是【 】。
9 解析：inc函数每执行一次就向x上累加一次传入的参数，所以最后x的值为：2+3+4=90
第6题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。
A．VVV
B．Vis
C．sic
D．11
解析：函数string(n，字符串)的功能是返回由n个指定“字符串”中第一个字符组成的字符串。本题中的字符串“VisualBasic”的第一个字符为“V”，所以返回3个“V”，即String函数返回的字符为“VVV”。
第7题：
在窗体中添加一个命令按钮(名为Command1)，然后编写如下代码：
Public x as integer
Private Sub Command1_Click( )
x=5
Call s1
Call s2
MsgBox x
End Sub
Private Sub s1( )
x=x+10
End Sub
Private Sub s2( )
Dim x as integer
x=x+10
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是______
15 解析： 本题使用Call调用子过程s1，s2。x=5在调用子过程s1后，x= 15，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于使用Dim…As关键字定义x，所以其值是模块范围的。所以在消息框中输出的值，是从子过程s2传回的值。
第8题：
设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x; y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。
A．10 5
B．20 5
C．20 40
D．10 40
解析：虽然变量x被定义为静态变量，但并不改变传地址传送的关系。x作为实参传给f子函数后，形参x的值先为5，执行“x=20”后，由于传地址传送的关系，实参x的值也为20。子函数返回之前，f的值为40，返回后变量y的值为40。最后打印出20和40。
第9题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Commandl_Click( )
Static X As Integer
Static Y As Integer
Cls
Y=1
Y=Y+5
X=5+X
Print X, Y
End Sub
程序运行时，3次单击命令按钮Command1后，窗体上显示的结果为【 】。
15 6 解析：在本题过程中使用了两个Static变量，其中的变量Y每次都被重新赋值，因此不管执行多少次，Y的结果只会是6；而变量X的值则一直累计，执行3次后，x为15。
第10题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Dim k As IntegerPrivate Sub form_ Load() k = 15End SubPrivate Sub Command1_ Click()Static b As IntegerDim k As Integer k= k +1 b = b+1 Print k, bEnd Sub程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是______。
A．1 1
B．1 2
C．2 1
D．2 2
解析：本题首先定义了一个窗体级变量K，在窗体的Load事件代码中给K赋值150第一次单击命令按钮时，定义了一个静态变量b和一个局部变量k，注意这里的k不是窗体级变量，对它的修改不影响窗体级变量K，执行下面的两条赋值语句后，k的值为1，b的值为1，输出的第一行为1 1。第二次单击Command1，执行Click事件过程，注意此时变量b的值将是上一次退出时的值为1，而不是0，但局部变量k的值为0，执行下面的两条赋值语句后，k的值为1，b的值为2，所以输出的第二行为“1 2”。