设有命令按钮Command1的单击事件过程，代码如下：Private Sub Command1_Click（）Dim a（30）As IntegerFor i=1 To 30a（i）=Int（Rnd*100）NextFor Each arrItem In aIf arrItem Mod 7=0 Then Print arrItem；If arrItem90 Then Exit ForNextEnd Sub对于该事件过程，以下叙述中错误的是（ ）。A．a数组中的数据是30个100以内的整数B．语句For Each arrItem In a有语法错误C．If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数D．If arrItem90……语句的作用是当数组元素的值大于90时退出For循环
设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click（）
Dim a（30）As Integer
For i=1 To 30
a（i）=Int（Rnd*100）
Next
For Each arrItem In a
If arrItem Mod 7=0 Then Print arrItem；
If arrItem>90 Then Exit For
Next
End Sub
对于该事件过程，以下叙述中错误的是（ ）。
A．a数组中的数据是30个100以内的整数
B．语句For Each arrItem In a有语法错误
C．If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数
D．If arrItem>90……语句的作用是当数组元素的值大于90时退出For循环
相关考题：
设有命令按钮Command1的单击事件过程，代码如下：Private Sub Command1_Click（）Dim a（3，3）As IntegerFor i=1 To 3For j=1 To 3a（i，j）=i*j+iNext jNext iSum=0For i=1 To 3Sum=Sum+a（i，4-i）Next iPrint SumEnd Sub运行程序，单击命令按钮，输出结果是（ ）。A．20B．7C．16D．17
（ 22 ）命令按钮 Command1 的单击事件过程的代码如下：Private Sub Command1_Click( )Dim a(3 , 3)As IntegerFor i=1 To 3For j=1 To 3a(i , j)=i*j+iNext jNext iSum=0For i=1 To 3Sum=Sum+a(i , 4-i)Next iPrint SumEnd Sub运行程序，单击命令按钮，输出结果是（ ）。A ） 20B ） 7C ） 16D ） 17
设有命令按钮Command1的单击事件过程，代码如下： Private Sub Command1 Click() Dim a(3,3)As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i*j+i Next j Next i Sum=0 For i=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End Sub 运行程序，单击命令按钮，输出结果是______。A．20B．7C．16D．17
设有命令按钮Command1的单击事件过程,代码如下:Private Sub Command1_Click()Dim a As IntegerFor i=1 To 30a(i)=iNextFor Each arrItem 【 】aIf arrItem Mod 7=0 Then Print arrItem;If arritem90 Then Exit ForNextEnd Sub请填空。
在窗体上有一个命令按钮Command1，编写事件代码如下：Private Sub Command1_Click()Dim a(10)，P(3) As Integerk=5For i=1 To 10For i=1 To 3For i=1 To 3End Sub打开窗体运行后，单击命令按钮，消息框中输出的结果是( )。
设有命令按钮Command1的单击事件过程，代码如下，请填空。Private Sub Command1_Click()Dim a(30) As IntegerFor i=1 To 30a(i) =iNextFor Each arrItem______aIf arrItem Mod 7=0 Then Print arrItem；If arrItem＞90 Then Exit ForNextEnd Sub
设有一个命令按钮Command1的事件过程以及一个函数过程，程序如下：Private Sub Command1_Click()Static x as integerX=f(x+5)ClsPrint xEnd SubPrivate function f(x as integer)as integerF=x+xEnd function连续单击命令按钮3次，第3次单击命令按钮后，窗体上显示的计算结果是A)10B)30C)60D)70
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim a()a＝Array("机床"，"车床"，"钻床"，"轴承")Print a(2)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim a() a=Array("机床"，"车床"，"钻床"，"轴承")Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承