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