在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2、Label3的标签，然后编写如下的事件过程：

Private x As Integer Private Sub Command1_Click()

Static y As Integer

Dim z As Integer

n = 10

z = n + z

y = y + z

x = x + z

Label1.Caption = x

Label2.Caption = y

Label3.Caption = z End Sub

运行程序后，连续三次单击命令按钮后，则三个标签中显示的内容分别是（）

[单选题]在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下的事件过程： Private Sub Command1_Click()s = 0For i = 0 To 15X = 2 * i - 1If X Mod 3 = 0 Then s = s + 1Next iLabel1.Caption = s End Sub程序运行后，单击命令按钮，则标签中显示的内容为（）A . 1B . 5C . 27D . 45

[单选题]在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click( ) S=0 For i=1 To 15 x=2*i-1 1fx Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是A．1B．5C．27D．45

[试题]在窗体上画一个名称为Command1的命令按钮和3个名称为Labe11、Labe12、LabeD的标签，然后编写如下程序段：Private x AS IntegerPrivate Sub Command1_Click()Static y AS IntegerD．im z As Integern=10z=n+zy=y+zX=X+ZLabell．Caption=xLabel2．Caption=yLabel3．Capt&on=zE．nd Sub运行程序，连续3次单击命令按钮后，则3个标签中显示的

[单选题]在窗体上画一个名称为Command1的命令按钮和3个名称为Labe11、Labe12、Labe13的标签，然后 编写如下程序段： 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 Labe11．Caption=x Labe12．Caption=y Labe13．Caption=z End Sub 运行程序，连续3次单击命令按

[单选题]在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Labet3的标签，然后编写如下代码： Private x AS Integer Private Sub Command1_Click( ) Static y As Integer Dim 2 As Integer n=10 Z=n+2 y=y+2 X=X+2 Label1.Caption=x LabelCaption=y LabelCaption=z End Sub 运行程序，连续三次单击命令按钮后，则三

[单选题]在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码： Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n=10 z=n+z y=y+z x=x+z Label1.Caption=x Label2.Caption=y Label3.Caption=z End Sub 运行程序，连续三次单击命令按钮后

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

[单选题]在窗体中添加一个名称为Command1的命令按钮、一个名称为Label1的标签，编写如下代码： Option Base 1 Private Sub Command1_Click( ) a=Array(23，34，25，46，35) ┊ End Sub 过程的功能是求数组a中是奇数的元素的个数，并把结果显示在标签中。为实现此功能，省略号处的程序段应该是A．For i=0 T0 4 If a(i)Mod 2＜>0 Then b=b+1 End lf Next i Label1.Caption=

[试题]（ 8 ）在窗体上画一个名称为 “ Command1 ” 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()D．im a As Stringa = "123456789"F．or i = 1 To 5Print Space(6 - i); Mid$(a, ( 8 ) , 2 * i - 1)Next iE．nd Sub程序运行后，单击命令按钮，窗体上的输出结果是5456345672345678123456789请填空。

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下程序 _______。 Dim k As Integer Private Sub Form_Load() k=5 End Sub Private Sub Command Click() Static b As Integer b ＝ b + k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是 _______。A．7 11B．5 11C．76D．2 1