单项选择题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：
Option Base 1
Private Sub Command1_Click( )
Dim a As Variant
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．12
C．34
D．1234
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个文本框(Text1)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在输入文本框Text1中输入“A”，则程序在窗体上的输出结果为______。
A．a
B．A
C．aaaa
D．AAAA
单项选择题
在窗体上画一个文本框，然后编写如下代码： Option Base 1 Private Sub Form_Click( ) Dim arr Dim Start As Integer, Finish As Integer Dim Sum As Integer art=Array(12，4，8，16) Start=LBound(arr) Finish=UBound(arr) Sum=0 For i=Start To Finish Sum=Sum+arr(i) Next i c=Sum Finish Text1.Text=c End Sub 程序运行后，单击窗体．则在文本框中显示的内容是______。
A．40
B．10
C．12
D．16
相关试题