在窗体上有一个命令按钮Command1,编写事件代码如下:
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=12:y=32
Call Proc(x,y)
Debug.Print x;y
End Sub
Public Sub proc(n As Integer,ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
打开窗体运行后,单击命令按钮,窗口上输出的结果是( )。
A.2 32
B.12 3
C.2 2
D.12 32
参考答案:A
解析: 由程序可知proc过程作用是将参数的个位求出并赋给本身。它的第一个参数是默认按地址传递所以它可以改变实参的值,而第二个是接值传递,形参的改变对实参无影响。于是当Call proc(x,y)后x由12变为2,而y仍为32。