已知一窗体上命令按钮Command1的Click事件代码如下，则单击Command1后，文本显示的文字为（）。

PrivateSubCommand1_Click（）

Text1.Text="湖南省"&"计算机"+"等级考试"

Text1.ForeColor=vbRed

Text1.BackColor=vbGreen

Text1.FontBold=True

EndSub

[单选题]单击窗体上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

[单选题]（ 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（）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

[单选题]在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。 For i= 1 To 4 For j = 1 To 3 x=3 For k =1 To 2 x=x+3 Next k Next j Next i TextText = Str(x)A．3B．6C．9D．12

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

[单选题]在窗体中有一个命令按钮Command1，对应的事件代码如下： PrivateSubCommand1_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i=1 To 10 num=InputBox(“请输入数据：”，“输入”，1) If Int(num/2)=num/2Then a=a+1 Else b=b+l End If Next i MsgBox(“运行结果：a=“&St

[单选题]设有命令按钮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数组中的数据是