在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Lubd2的标签,然后编写如下程

19 查阅

在窗体上画一个名称为Commandl的命令按钮，再画两个名称分别为Labell、Lubd2的标签，然后编写如下程序代码：

Private X As Integer

Private Sub Commandl_Click()

X=5：Y=3

Call proc(X，Y)

Labell．Caption=X

Label2．Caption=Y

End Sub

Private Sub proc(a As Integer，ByVal b As Integer)

X=a*a

Y=b+b

End Sub

程序运行后，单击命令按钮，则两个标签中显示的内容分别是

A．25和3

B．5和3

C．25和6

D．5和6

参考答案:

B解析：ByVal为传值，当你把函数外的一个变量，如n传给ByVal的参数时，在函数体内对该参数所做的任何变更，不会影响函数体外的这个n变量的值。而ByRef为传址，即把函数体外变量n的地址传给ByRef的函数参数，在函数内对该参数所做的变更就会体现在函数体外部的这个变量n上。在本题中，在自定义函数pro~中，定义b为ByVal，默认a为ByRef，在该字函数中运算结果为x=25，y=6。这里的x、y的值并不能改变主函数中的x、y值，所以运算后，x,y的值仍保持不变。

计算机二级