问题 单项选择题

在窗体上画两个标签和一个命令按钮,其名称分别为Labe11、Labe12和Command1,然后编写如下程序:
Private Sub func(L As Labe1, ByVal a As Integer)
L.Caption="1234"
a=a*a
End Sub
Private Sub Form_Load()
Labe11.Caption="ABCD"
Labe12.Caption=10
End Sub
Private Sub Command1_Click()
a=Val(Labe12.Caption)
Call func(Labe11,

A.
Labe12.Caption=a
End Sub
程序运行后,单击命令按钮,在两个标签Labe11和Labe12中显示的内容分别是______。A) ABCD 和 10

B.1234 和 100

C.ABCD 和 100

D.1234 和 10

答案

参考答案:D

解析:[评析] 单击命令按钮后变量a赋初值a=10,通过Call调用函数后,Labe11.Caption="1234",而由于参数a是按值传递的,所以调用完函数后变量a的值在单击事件中并没有改变,所以执行语句Labe12.Caption=a后, Labe12中显示的值仍为10。

单项选择题
判断题