在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As Label,ByVal a As Integer) L.Caption="1

admin2010-09-11  21

问题 在窗体上画两个标签和一个命令按钮,其名称分别为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。
转载请注明原文地址:https://kaotiyun.com/show/VXmp777K
0

最新回复(0)