单项选择题

下列程序的输出结果为( )。
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方法
相关试题