( 27 )在窗体上画两个标签和一个命令按钮,其名称分别为 Label1 、 Label2 和 Command1 ,然后编写如下程序:
Private Sub func(L As Label)
L.Caption= ” 1234 ”
End sub
Private Sub Form_Load()
Label2.Caption=10
End sub
Private Sub Command1_Click()
A=Val(Label2.Caption)
Call func(Label1)
Label2.Caption=a
End sub
程序运行后,单击命令按钮,则在两个标签中显示的内容分别为
A ) ABCD 和 10
B ) 1234 和 100
C ) ABCD 和 100
D ) 1234 和 10
第1题:
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写下列程序: Private Sub rune(L AS Labe1) Caption="1234" End Sub Private Sub Form. Load( ) Labe11.Caption="ABCDE" Labe12.Caption=10 End Sub Private Sub Command1Click( ) a=Va1(Label2.Caption) Call func(Label1) Label2.Caption a End Sub 程序运行后,单击命令按钮,则在两个标签中显示的内容分别为( )。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
第2题:
在窗体上画两个标签和一个命令按钮,其名称分别为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
第3题:
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写下列程序:
Private Sub rune(L AS Labe1)
Caption="1234"
End Sub
Private Sub Form. Load( )
Labe11.Caption="ABCDE"
Labe12.Caption=10
End Sub
Private Sub Command1Click( )
a=Va1(Label2.Caption)
Call func(Label1)
Label2.Caption a
End Sub
程序运行后,单击命令按钮,则在两个标签中显示的内容分别为( )。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
第4题:
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码: Private X As Integer Private Sub Command1_Click( ) X=5:Y=3 Call proc(X,Y) Label1.Caption=X LabeLCaption=Y End Sub Private Sub proc(ByVal a As Integer,ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后,单击命令按钮,则两个标签中显示的内容分别是
A.5和3
B.25和3
C.25和6
D.5和6
第5题:
在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Command1的命令按钮,然后编写如下事件过程:
运行上面的程序,单击命令按钮.其输出结果是
A.8 9
B.8 18
C.64 9
D.64 18