单项选择题

下列程序的输出结果为( )。
Private Sub Command1_Click()
Dim a(20)
For j=1 To 20 Step2
　　a(j)=j
Next i
Print a(1)+a(2)+a(3)
End Sub

A．4
B．5
C．6
D．7

<上一题目录下一题>

热门试题

单项选择题

下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Const a=6 Dim x (a) As Integer For I=1 to a x(i)=1^2 Next I Print x(i) End Sub

A．36
B．25
C．1
D．出错信息

单项选择题

当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的( )。

A．AutoSize属性
B．Resize事件
C．AutoRedraw属性
D．Stretch方法

相关试题