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

admin2010-03-30  34

问题 在窗体上画两个标签和一个命令按钮,其名称分别为Labell、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(Labell,A)Label2.Caption=a    End Sub    程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是 ______。

选项 A、ABCD和10
B、1234和100
C、ABCD和100
D、1234和10

答案8

解析 单击命令按钮后变量a赋初值a=10,通过Call调用函数后,Labell.Caption="1234",而由于参数a是按值传递的,所以调用完函数后变量a的值在单击事件中并没有改变,所以执行语句Label2.Caption=a后, Label2中显示的值仍为10。
转载请注明原文地址:https://kaotiyun.com/show/kK1p777K
0

最新回复(0)