问题
单项选择题
在窗体上画两个标签和一个命令按钮，其名称分别为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。