题目内容
（请给出正确答案）
在窗体上画—个命令按钮(其名称为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 6 9
B．1 2 3 4 5 6 7 8 9
C．1 2 3 4 5 6 7 8 9
D．没有输出
如果结果不匹配，请 联系老师 获取答案
更多“在窗体上画—个命令按钮（其名称为Command1)，然后编写…”相关的问题
在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() CommonDialogl.Flags=cdlOFNHideReadOnly commonDialogl.Filter="All Files(*.*)|*.*| Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat" CommonDialogl.Filterlndex=1 CommonDialogl.ShowOpen MsgBox CommonDialogl.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 ______。
A．AllFiles(*.*)
B．TextFiles(*.txt)
C．BatchFiles(*.bat)
D．不确定
在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： private Sub Command1_Click() CommonDialog1.Flags=cdl0FNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat" CommonDialog1.Filterlndex=2 CommonDialog1.ShowOPen MsgBox CommonDialog1.filename End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是______。
A．All Files(*.*)
B．Text Files(*.txt)
C．Batch Files(*.bat)
D．不确定
A．4321
B．1234
C．34
D．12
在窗体上画l个命令按钮和l个文本框，其名称为Command1和Text1，再编写如下程序：
Dim ss As String
Private Sub Text1 KeyPress(KeyAscii As Integer)
If Chr(KeyAscii)＜＞""Then ss=ss+Chr(KeyAscii)
End Sub
Private Sub Command1 Click（）
Dim m As String，i As Integer
For i=Len(ss)To 1 Step-1
m=m+Mid(SS，i，1)
Next
Text1．Text=UCase(m)
End Sub
程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的就是（）。
A.NUMtBER l00
B.REBMUN
C.REBM UN l00
D.001 REBMUN
在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果是()。
Private Sub p1(n As Integer)
For i=n To 1 Step-1
x=String(i,"*")
Print x
Next i
End Sub
Private Sub Command1_Click()
p1(3)
End SubA)
*B)C)D)
A．*** ** *
B．* ** ****
C．* * *
D．******
在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程： Private Sub Commandl_click() Dim i As Integer,X As Integer For i=1 To 6 If i=1 Then x=i If i＜=4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为______。
A． 9
B．6
C．12
D．15
在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果为()。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i，"*") Print x Next i End Sub Private Sub Command1_Click() p1(3) End Sub
A．*** ** *
B．* ** ***
C．* * *
D．******
在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：
Private Sub Corrtmandl Click()
a$=”Nationalcomputer rank Examination”
n=Len(a$)
S=0
For i=1 To n
b$=Mid(a$，i，1)
Ifb$=”n”Then
s=s+1
End If
Next i
Print s
End Sub
程序运行后，单击命令按钮，输出结果是【 】。
在窗体上画一个命令按钮，其名称为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．49
B．64
C．81
D．100
在窗体上画一个命令按钮，其名称为Command1，然后编写下列代码：
Option Base l
Private Sub Command1 Click（）
Dim a
a=Array(1，2，3，4)
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print S
End Sub
程序运行后，单击命令按钮，其输出结果是（）。
A.4321
B.1234
C.34
D.12
