（7）在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程：

Private Sub Command1_Click( )

a$="National Computer Rank Examination"

n=Len(a$)

s=0

F．or i=1 To n

b$=Mid(a$, i, 1)

If b$="n" Then

s=s+1

E．nd If

Next i

Print s

E．nd Sub

程序运行后，单击命令按钮，输出结果是 (7) 。

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）D．im i As Integer, x As IntegerF．or i = 1 To 6If i = 1 Then x = iIf i <= 4 Thenx = x + 1E．lsex = x + 2E．nd IfNext iPrint xE．nd Sub程序运行后，单击命令按钮，其输出结果为（ ）。A．9B．6C．12D．15

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）D．im a1（4, 4）, a2（4, 4）F．or i = 1 To 4F．or j = 1 To 4a1（i, j） = i + ja2（i, j） = a1（i, j） + i + jNext jNext iPrint a1（3, 3）; a2（3, 3）E．nd Sub程序运行后，单击命令按钮，在窗体上输出的是（ ）。A．6 6B．10 5C．7 21D．6

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）a = 12345Print Format$（a, "000.00"）E．nd Sub程序运行后，单击命令按钮，窗体上显示的是（ ）。A．123.45B．12345.00C．12345D．00123.45

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click() Dim a1(4,4),a2(4,4) For i=1 To 4 For j=1 To 4 al(i,j)=i+j a2(i,j)=a1(i,j)+i+j Next j Next i Print al(3,3);a2(3,3)End Sub 程序运行后，单击命令按钮，在窗体上输出的是（ ）。A．6 6 B．10 5 C．7 21 D．6 12

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()D．im aS，b$，c$，k％a=”ABCD”b=”123456”c=””k=1D．o While k<=Len(a) Or k<=Len(b)If k<=Len(a)Thenc=c&Mid(a，k，1)E．nd IfIf k<=Len(b)Thenc=c&Mid(a，k，1)E．nd Ifk=k+1LoopPrint cE．n

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是A． 123.45B．12345.00C．12345D．00123.45

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后，单击命令按钮，窗体上显示的是( )。A．123.45B．12345.00C．12345D．00123.45

[单选题]在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后，单击命令按钮，在窗体上输出的是______。A．49B．64C．81D．100

[单选题]在窗体上画一个命令按钮(其名称为Command1)，然后编写如下事件过程： Private Shb Command1_Chck() Dim a(5,5) As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=1 To 3 a(i,j)=(i-1) * 3+j Print a(i,j) Next j Print Next i End Sub 程序运行后，单击命令按钮，在窗体上的输出结果是______。A．1 4 7 2 5 8 3

[单选题]在窗体上画一个命令按钮(其名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() Dim a(5，5)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=1 To 3 a(i，j)=(i-1)*3+j Print a(i，j) Next j Print Next i End Sub 程序运行后，单击命令按钮，在窗体上的输出结果是： ______。A．1 4 7 2 5 8 3