单选题 在窗体上画两个标签和一个命令按钮,其名称分别为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中显示的内容分别是______。
【正确答案】 D
【答案解析】[评析] 单击命令按钮后变量a赋初值a=10,通过Call调用函数后,Label1.Caption="1234",而由于参数a是按值传递的,所以调用完函数后变量a的值在单击事件中并没有改变,所以执行语句Label2.Caption=a后,Label2中显示的值仍为10。