计算机二级
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim as=0:j=1a=Array(1,2,3,4)For i=4 To 1 Step-1s=s+a(i)*jj=j*10NextPrint sEnd Sub运行上面的程序并单击命令按钮,其输出结果是A．4221B．1234C．34D．12
题目
在窗体上画一个命令按钮(其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
相似问题和答案
第1题：
在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程： 
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为多少？
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为：同学们，你们好。
略
第2题：
在窗体上画两个文本框，（其Name 属性分别为Text1和Text2）和一个命令按纽（其Name属性为Command1），然后编写如下事件过程（） 
A1和0
B2和72
C3和50
D4和168
B
略
第3题：
在窗体上画两个文本框（其Name属性分别为Text1和Tex12）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程： 
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。
A10和0
B2和100
C3和50
D4和168
B
略
第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
第5题：
在窗体上画一个命令按钮(其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 Print Next i End Sub程序运行后，单击命令按钮，输出结果为______。
A．6 9 7 10
B．7 10 8 11
C．8 11 9 12
D．9 12 10 13
第6题：
在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_Click() Dim Arr1(10)As Integer，arr2(10)As Integer n=3 For i=1 To 5 Arr1(i)=i arr2(n)=2*n+i Next i Print arr2(n)；Arr1(n) End Sub 程序运行后，单击命令按钮，输出结果是 ______。
A．11 3
B．3 11
C．13 3
D．3 13
解析：本题的程序每次循环都将arr2(3)重新赋一次值。最终的arr2(3)的值为2*3+5=11。而arr1(3)的值始终为3。所以最终的输出是11和3。
第7题：
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Private Sub Command1_Click()
Dim a(5,5)
For i=1 To 3
For j=1 To 4
a(i,j)=i*j
Next
Next
For n=1 To 2
For m=1 To 3
Print a(m,n);
Next
Next
End Sub
程序运行后,单击命令按钮,输出结果是
A．2 4 6 1 2 3
B．1 2 3 2 4 6
C．1 2 3 4 5 6
D．6 5 4 3 2 1
解析：输出值为下标的乘积,即1×1，1×2,1×3,2×1,2×2,2×3。
第8题：
在窗体上画一个命令按钮(其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
解析：第1个输出为a(3,3)=(3-1)*3+3=9。第2个输出为a(4,3)=(4-1)*3+3=12。第3个输出为 a(3,4)=(3-1)*3+4=10。第4个输出为a(4,4)=(4-1)*3+4=13
第9题：
在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Private Sub Command1_C1ick()
Dim a(5，5)
For i=1 To 3
For j=1 To 4
a(i，j) =i*j
Next
Next
For n=1 To 2
For m=1 To 3
Print a(m,n)；
Next
Next
End Sub
程序运行后，单击命令按钮，输出结果是
A．2 4 6 1 2 3
B． 1 2 3 2 4 6
C．1 2 3 4 5 6
D．6 5 4 3 2 1
解析：输出值为下标的乘积，即1×1，1×2，1×3，2×1，2×2，2×3。