题目内容
（请给出正确答案）
（30）在窗体上画一个名为 Command1 的命令按钮，然后编写如下代码：
Option Base 1
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）1234
B）12
C）34
D）4321
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“（30）在窗体上画一个名为 Command1 的命令按钮，然后编写如下代码： Option Base 1 Private Sub Com”相关的问题
在窗体上画一个命令按钮，各称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Cliek() Dim city As Variant city = array("北京","上海","天津","重庆") Print city(1 ) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是()。
A．空白
B．错误提示
C．北京
D．上海
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京"，"上海"，"天津"，"重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。
A．空白
B．错误提示
C．北京
D．上海
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程； Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京", "上海", "天津", "重庆") Print city(1) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是______。
A．空白
B．错误提示
C．北京
D．上海
在窗体上画一个名为Commandl的命令按钮，然后编写如下代码：
option Base 1
Pdvate Sub Commandl_Click()
Dim a
a=Array(1，2，3，4)
J=1
For i=3 To 1 Step-1
s=s+a(i)*J
j=j*10
Nexti
Print s
End Sub
运行上面的程序，其输出结果是
A．1234
B．12
C．34
D．4321
在窗体上画一个名为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim Arr Arr = Array(1,2,3,4,5) j=1 For i = 5 To 1 Step -1 S = S + Art(i) * j j =j * 10 Next Print S End Sub 程序运行后，单击命令按钮，输出结果为()。
A．54321
B．123
C．12345
D．345
在窗体上画一个名为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1，2，3，4，5) j = 1 For i=5 To 1 Step-1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后，单击命令按钮，输出结果为()。
A．54321
B．123
C．12345
D．345
(29）在窗体上画一个名为Command 1的命令按钮，然后编写以下程序：
Private Sub Commandl_lick()
Dim a(10) As Integer
For k＝10 To 1 Step-1
a(k)＝20-2*k
Next k
k＝k＋7
Print a(k-a(k))
End Sub
运行程序，单击命令按钮，输出结果是
A）18
B）12
C）8
D）6
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
