问题
单项选择题
在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序：
Private Sub func(L As Label，ByVal a As Integer)
L.Caption="1234"
a=a*a
End Sub
Private Sub Form_ Load()
Label1.Caption="ABCD"
Label2.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Label2.Caption)
Call func (Label1，
A．
Label2.Caption=a
End Sub
程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是______。A) ABCD和10
B．1234和100
C．ABCD和100
D．1234和10
答案
参考答案：D
解析：[评析] 单击命令按钮后变量a赋初值a=10，通过Call调用函数后，Label1.Caption=“1234”，而由于参数a是按值传递的，所以调用完函数后变量a的值在单击事件中并没有改变，所以执行语句Label2.Caption=a后，Label2中显示的值仍为10。