单项选择题

在窗体上画一个命令按钮(其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
<上一题 目录 下一题>
热门 试题

单项选择题
编写如下两个事件过程： Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer) Print Cb_r(KeyCode) End Sub Private Sub Form_KeyPress( KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按“A”键，则程序输出的结果是
A．A A
B．a A
C．A a
D．a a
单项选择题
下面程序段，运行后的结果是 Private Sub Command1_Click() Dim b%(1 To 4) ,i%, t# For i = 1 To 4 b(i) =i Next t =Tof(b() ) Print t = ; t, End Sub Function Tof(a() As Integer) Dim t#, i% t=1 For i =2 To UBound(a) t=t * a(i) Next Tof = t End Function
A．t=18
B．t=24
C．t=30
D．t=32
相关试题