在窗体上画一个命令按钮和两个标签,真名和分别为 Commandl 、 Labell 和 Labe12 ,然后编写如下事件过程:Private Sub Commandl_Chick.a=0For i=1 To 10a=a+1b=0Forj=1 To 10a=a+1b=b+2NextjNext iLabel1. Caption=Str(a)Labe12.Caption=Str(b)End Sub程序运行后,单击命令按钮,在标签 Label1和Label2中显示的内容分别为( )。 A.10 和 20B.20 和 110C.200 和 110D.110 和 20

在窗体上画一个命令按钮和两个标签,真名和分别为 Commandl 、 Labell 和 Labe12 ,然后编写如下事件过程:

Private Sub Commandl_Chick.

a=0

For i=1 To 10

a=a+1

b=0

Forj=1 To 10

a=a+1

b=b+2

Nextj

Next i

Label1. Caption=Str(a)

Labe12.Caption=Str(b)

End Sub

程序运行后,单击命令按钮,在标签 Label1和Label2中显示的内容分别为( )。 A.10 和 20

B.20 和 110

C.200 和 110

D.110 和 20


相关考题:

在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labell,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是 ______。A.27B.28C.29D.30

在窗体上画两个标签和一个命令按钮,其名称分别为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和10B.1234和100C.ABCD和100D.1234和10

在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Labell和 Commandl,然后编写如下两个事件过程;Private Sub Command1_Click()S$= InputBox ("请输入1个字符串")Text1.Text= S$End SubPrivate Sub Text1_Change()Labell.Caption = UCase(Mid(Text1, Text2, 8))End Sub程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串"Visual Basic",则在标签中显示的内容是______。

在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程:Private Sub Command1_Click()Counter=0Fori=1 T04Forj=6 To 1 Step一2Counter=Counter+1Next jNextiLabell.Caption=Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是A.11B.12C.16D.20

在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Lubd2的标签,然后编写如下程序代码:Private X As IntegerPrivate Sub Commandl_Click()X=5:Y=3Call proc(X,Y)Labell.Caption=XLabel2.Caption=YEnd SubPrivate Sub proc(a As Integer,ByVal b As Integer)X=a*aY=b+bEnd Sub程序运行后,单击命令按钮,则两个标签中显示的内容分别是A.25和3B.5和3C.25和6D.5和6

在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和 Commandl,然后编写如下两个事件过程: Prirate SUb Command1 Click() strText = InputBox(“请输入”) Textl.Text = strText End Sub Private Sub Text1 Change() Labell.Caption = Right(Trim(Text1.Text), 3) End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入abcdef,则在标签中显示的内容是A.空B.abcdefC.abcD.def

在窗体上画两个标签和一个命令按钮,其名称分别为Labe11、Labe12和Command1,然后编写如下程序: Private SUb fune(L As Label,By Val a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form. Load() LabeCaptlon="ABCD" LabeCapfion=10 End Sub Private SUb Command1_Click() a=Val(Label2.Caption) Callfunc(Labell,A)LabeCaption=a End Sub 程序运行后,单击命令按钮,在两个标签Labe11和Labe12中显示的内容分别是______。A.ABCD和10B.1234和100C.ABCD和100D.1234和10

在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:A. 1和0B. 2和72C. 3和50D. 4和168

在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Label1,然后编写如下事件过程:Private Sub Command1_Click()Counter=0For i=1 T0 4For j=6 T0 1 Step -2Counter=Counter+1Next jNext iLabel1.Caption=Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是______。