Command1_Click（)事件代码如下：Private Sub Command1_Click（) Dim x As Integer, Y As Integer x

设有命令按钮Command1的单击事件过程，代码如下，请填空。

Private Sub Command1_Click()

Dim a(30) As Integer

For i=1 To 30

a(i) =i

Next

For Each arrItem______a

If arrItem Mod 7=0 Then Print arrItem；

If arrItem＞90 Then Exit For

Next

End Sub

在窗体中添加一个名为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() a＝75 If a＞60 Then k＝1 ElseIf a＞70 Then k＝2 ElseIf a＞80 Then k＝3 ElseIf a＞90 Then k＝4 EndIf

A．1

B． 2

C． 3

D． 4

在窗体上有一个命令按钮Command1，编写事件代码如下：

Private Sub Command1_Click()

Dim a(10)，P(3) As Integer

k=5

For i=1 To 10

For i=1 To 3

For i=1 To 3

End Sub

打开窗体运行后，单击命令按钮，消息框中输出的结果是()。

设有命令按钮Command1的单击事件过程,代码如下:

Private Sub Command1_Click()

Dim a As Integer

For i=1 To 30

a(i)=i

Next

For Each arrItem 【 】a

If arrItem Mod 7=0 Then Print arrItem;

If arritem＞90 Then Exit For

Next

End Sub

请填空。

在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件代码：

Private Sub Command1_Click()

A＝75

If A＜60 Then x＝1

If A＜70 Then x＝2

If A＜80 Then x＝3

If A＜90 Then x＝4

MsgBox x

End sub

打开窗体运行后，单击命令按钮，则消息框的输出结果是()。

A．1

B．2

C．3

D．4

在窗体中有一个名为Command1的命令按钮，事件代码如下： Private Sub Command1_Click（） Dim m(10) For k=1 T0 10 m(k)=11=k Next k x=6 MsgBox m(2+m(x)) End Sub 打开窗体，单击命令按钮，消息框的输出结果是（）。

A.2

B.3

C.4

D.5

在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() a=75 If a＞60 Then g=1 Elself a＞70 Then g=2 Elself a＞80 Then g=3 Elself a＞90 Then g=4 End If MsgBox g End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是()。

A．1

B．2

C．3

D．4

在窗休中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() Dim a(10,10) For m=2 To 4 For n=4 To 5 a(m,n)=m*n Next n Next m MsgBox a(2,5)＋a(3,4)＋a(4,5) End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。

A．22

B．32

C．42

D．52

在窗体中有一个名为Command1的命令按钮，事件代码如下：

Private Sub Command1_Click（）

Dim m(10)

For k=1 T0 10

m(k)=11=k

Next k

x=6

MsgBox m(2+m(x))

End Sub

打开窗体，单击命令按钮，消息框的输出结果是（）。

A.2

B.3

C.4

D.5