( 20 )在窗体上画一个命令按钮和两个标签,其名称分别为 Command1 、 Label1 和 Label2 ,然后编写如下事件过程:
Private Sub Command1_Click()
a = 0
For i = 1 To 10
a = a + 1
b = 0
For j = 1 To 10
a = a + 1
b = b + 2
Next j
Next i
Label1.Caption = Str(a )
Label2.Caption = Str(b )
End Sub
程序运行后,单击命令按钮,在标签 Label1 和 Label2 中显示的内容分别是
A ) 10 和 20
B ) 20 和 110
C ) 200 和 110
D ) 11 0 和 20
第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