设有命令按钮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数组中的数据是20个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()D．im a As IntegerF．or i=1 To 30a(i)=iNextF．or Each arrItem [ ]aIf arrItem Mod 7=0 Then Print arrItem;If arritem>90 Then Exit ForNextE．nd Sub请填空。

[单选题]设有命令按钮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

[单选题]设有命令按钮Commandl的单击事件过程，代码如下： Private Sub Commandl_Click() Dima(3,3)As Integer Fori=1 To 3 Forj=1 To 3 a(i,j)=i*j+i Next j Nexti Sum=0 Fori=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End SubA．20B．7C．16D．17

[单选题]设有命令按钮Commandl的单击事件过程，代码如下： Private Sub Commandl_Click() Dima(30)As Integer Fori=1 To 30 a(i)=Int(Rnd*100) Next For Each arrltem In a IfarrltemMod7=0 ThenPrintarrItem； Ifarrltem＞90ThenExitFor Next End SubA．a数组中的数据是30个100以内的整数B．语句ForEacharrItem Ina有语法

[单选题]设有命令按钮Command1的单击事件过程，代码如下：Private Sub Command1_Click（）D．im a（30）As IntegerF．or i=1 To 30a（i）=Int（Rnd*100）NextF．or Each arrItem In aIf arrItem Mod 7=0 Then Print arrItem；If arrItem>90 Then Exit ForNextE．nd Sub对于该事件过程，以下叙述中错误的是（ ）。A．a数组中的数据是30个100以

[单选题]设有命令按钮Command1的单击事件过程，代码如下：Private Sub Command1_Click（）D．im a（3，3）As IntegerF．or i=1 To 3F．or j=1 To 3a（i，j）=i*j+iNext jNext iSum=0F．or i=1 To 3Sum=Sum+a（i，4-i）Next iPrint SumE．nd Sub运行程序，单击命令按钮，输出结果是（ ）。A．20B．7C．16D．17

[单选题]（ 21 ）命令按钮 Command1 的单击事件过程的代码如下：Private Sub Command1_Click( )D．im a ( 30 ) As IntegerF．or i=1 To 30a(i)=Int(Rnd*100)NextF．or Each arrItem In aIf arrItem Mod 7=0 Then Print arrItem;If arrItem>90 Then Exit ForNextE．nd Sub对于该事件过程，下列叙述中错误的是（ ）。A． ） a

[单选题]（ 22 ）命令按钮 Command1 的单击事件过程的代码如下：Private Sub Command1_Click( )D．im a(3 , 3)As IntegerF．or i=1 To 3F．or j=1 To 3a(i , j)=i*j+iNext jNext iSum=0F．or i=1 To 3Sum=Sum+a(i , 4-i)Next iPrint SumE．nd Sub运行程序，单击命令按钮，输出结果是（ ）。A． ） 20B． ） 7C． ） 16D． ） 17

[单选题]单击窗体上Command1命令按钮时，执行如下事件过程： Private Sub Command1-Click() a$="software and hardware" b$=Right(a$，8) c$=Mid(a$，1，8) Msgbox a $,,b$；c$,1 End sub 则在弹出的信息框的标题栏中显示的信息是( )。A．software and hardwareB．softwareC．hardwareD．1

[单选题]在窗体上有一个命令按钮Command1，编写事件代码如下： Private Sub Command1_Click() Dim y As Integer y=0 Do y=InputBox("y=") If(y Mod 10)+Int(y/10)=10 Then Debug.Print y； Loop Until y=0 End Sub 打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、-19、0，立即窗口上输出的结果是( )。A．37 55 64 28 1