[单项选择题] 在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序： Private Sub func(L As Label，ByVal

14 查阅

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

Labell.Caption="ABCD"

Label2.Caption=10

End Sub

Private Sub Command1_Click()

a=Val(Label2.Caption)

Call func(Labell，

A．

Label2.Caption=a

End Sub

程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是：_______。A) ABCD和10

B．1234和100

C．ABCD和100

D．1234和10

参考答案:

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

[单项选择题] 在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1， 然后编写如下程序： Private Sub func(L As Label，ByVal