[单选题]

在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Lubd2的标签,然后编写如下程序代码:

Private X As Integer

Private Sub Commandl_Click()

X=5:Y=3

C.all proc(X,Y)

Labell.Caption=X

Label2.Caption=Y

E.nd Sub

Private Sub proc(a As Integer,ByVal b As Integer)

X=a*a

Y=b+b

E.nd Sub

程序运行后,单击命令按钮,则两个标签中显示的内容分别是

A.25和3

B.5和3

C.25和6

D.5和6

参考答案与解析:

相关试题

在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labe11、

[单选题]在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labe11、Labe12的标签,然后编写如下程序代码: Private X As Integer Private Sub Commandl_Click() X=5:Y=3 Callproc(X,Y) Labe11.Caption=X Label2.Caption=Y End Sub Private Sub proc(ByVala As Integer,ByValb As InA.5和3B.25和3C.25和6D.5和6

  • 查看答案
  • 在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然

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

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、

    [单选题]在窗体上画一个名称为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 Su

  • 查看答案
  • 在窗体上画一个名称为Commandl的命令按钮和3个名称为Labell、Labe

    [单选题]在窗体上画一个名称为Commandl的命令按钮和3个名称为Labell、Label2、Label3的标签,然后编写如下程序段: Private x As Integer Private Sub Commandl Click() Static y As Integer Dim z As Integer n=10 Z=n+z y=y+z x=x+z Labell.Captlon=x Label2.Caption=y Label3.Caption=z End Sub 运行程序,连续3次单击命令按钮后,

  • 查看答案
  • 在窗体上画一个名称为Commandl的命令按钮,一个名称为Labell的标签,然

    [单选题]在窗体上画一个名称为Commandl的命令按钮,一个名称为Labell的标签,然后编写如下事件过程: Private Sub Commandl_Click() S=0 Fori=1 To 15 x=2*i-1 If x Mod3=0 Thens=S+1 Nexti Labe11.Caption=S End Sub 程序运行后,单击命令按钮,则标签中显示的内容是( )。A.1B.5C.27D.45

  • 查看答案
  • 在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为Text1、Tex

    [单选题]在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程; Private Sub Command1_Click() n=Text1. Text Select Case n Case 1 To 20 x=10 Case 2, 4, 6 x=20 Case Is<10 x=30 Case 10 x=40 End Select TextText=x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2

  • 查看答案
  • 在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Tex

    [单选题]在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程: Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2,4,6 x=20 Case Is<10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中

  • 查看答案
  • 在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然

    [单选题]在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然后编写如下事件过程: Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=6 To 1 Step -2 Counter=Counter+1 Next j Next i Labell.Captidn=Str(Counter) End Sub 程序运行后,单击命令按钮,标签中显示的内容是______。A.11B.12C.16D.20

  • 查看答案
  • 在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然

    [单选题]在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然后编写如下代码:Sub S(x As Integer,Y As Integer)Static z As Integery=x*x+zz=yE.nd SubPrivate Sub Command1_Click()D.im i As Integer,z As Integerm=0z=0F.or i=1 To 3S i,zm=m+zNext iLabel1.Caption=Str(m)E.nd Sub程序运行后,单击命令按

  • 查看答案
  • 在窗体上画一个命令按钮和两个标签,真名和分别为 Commandl 、 Label

    [单选题]在窗体上画一个命令按钮和两个标签,真名和分别为 Commandl 、 Labell 和 Labe12 ,然后编写如下事件过程:Private Sub Commandl_Chick.a=0F.or i=1 To 10a=a+1b=0F.orj=1 To 10a=a+1b=b+2NextjNext iLabel1. Caption=Str(a)Labe12.Caption=Str(b)E.nd Sub程序运行后,单击命令按钮,在标签 Label1和Label2中显示的内容分别为( )。 A.10 和

  • 查看答案