更多"在窗体中添加一个命令按钮(其Name属性为Command1)，然后编写"的相关试题:
[单项选择]在窗体上添加一个命令按钮(其Name属性为Command1),然后编写如下代码： Option Base 1 Private Sub Command1_Click（ ） Dim a s = 0 a = Array(4, 3, 2, 1) 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
[单项选择]在窗体中添加一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1 Click（ ） Dim a a=Array(2， 4， 6， 8) j=1 For i = 4 To 1 Step -3 s=s+a(i) (j j = j ( 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是
A. 22
B. 24
C. 26
D. 28
[单项选择]在窗体上面一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Coramandl_Click（ ）
Dim a
s=0
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. 4221
B. 1234
C. 34
D. 12
[单项选择]在窗体上添加一个命令按钮，其名为Command1，然后编写代码如下：
Option Base 1
Private Sub command1_ Click（ ）
Dim arr (4)As Integer
Dim arrt (4) As Integer
for i= 1 To 4
Arr (i)= i
arr1 (n)= 2 * n + i
Next i
Print arr1 (n); arr(n)
程序的运行结果为______。
A. 3 11
B. 11 3
C. 10 3
D. 3 13
[单项选择]在窗体上一个命令按钮，名称为Command1，然后编写代码：
Option Base 0
Private Sub Command1_Click（ ）
Dim A(4)As Integer,B(4)As Integer
For k=0 To 2
A. )。 0
B. 2
C. 3
D. 4
[单项选择]在窗体上画一个命令按钮（其NAME属性为Command1），然后编写如下代码:
Option Base 1
Private Sub Command1_Click（ ）
Dim a
s = 0
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
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click（ ） Dim a(4, 4) For i = 1 To 4 For j = 1 To 4 a(i, j) = (i-1) * 3 + j Next j Next i For i = 3 To 4 For j = 3 To 4 Print a(j, i); Next j Next i End Sub 程序运行后，单击命令按钮，其输出结果为 ______。
A. 6 9 7 10
B. 7 10 8 11
C. 8 11 9 12
D. 9 12 10 13
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码：
Option Base 1
Private Sub Command1_Click( )
Dim a
s=0:j =1
a = Array(1,2,3,4)
For i=4 To 1 Step -1
s =s +a(i) *j
j=j * 10
Next
Print s
End Sub
运行上面的程序并单击命令按钮，其输出结果是
A. 4221
B. 1234
C. 34
D. 12
[单项选择]在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click（ ） Dim a(4，4) For i=1 To 4 For j=1 To 4 a(i，j)=(i-1)*3+j Next j Next i For i=3 To 4 For j=3 To 4 Print a(j，i)； Next j Next i End Sub 程序运行后，单击命令按钮，其输出结果为 ______ 。
A. 6 9 7 10
B. 7 10 8 11
C. 8 11 9 12
D. 9 12 10 13
