单项选择题

设有如下程序:
Private Sub Form_Click()
Dim ary(1 To 5)As Integer
Dim i As Integer
Dim sum As Integer
For i=1 To 5
ary(i)=i+1
sum=sum+ary(i)
Next i
Print sum
End Sub
程序运行后,单击窗体,则在窗体上显示的是( )。

A.15
B.16
C.20
D.25
<上一题 目录 下一题>
热门 试题

单项选择题
设有如下程序: Private Sub Form_Click() Cls a$= 123456 For i=1 To 6 Print Tab(12-i);______ Next i End Sub 程序运行后,单击窗体,要求结果如图所示,则应填入的内容为()。

A.Left(a$, i)
B.Mid(a$, 8 - i, i)
C.Right(a$, i)
D.Mid(a$, 7, i)

单项选择题
设有如下程序: Private Sub Form_Click() Dim s As Long, f As Long Dim n As Integer, i As Integer f=1 n=4 For i=1 To n f=f*i s=s+f Next i Print s End Sub 程序运行后,单击窗体,输出结果是( )。
A.32
B.33
C.34
D.35
相关试题
  • 在窗体上画一个命令按钮,名称为Command1...
  • 在窗体上画一个命令按钮,名称为command1...
  • 在窗体上画一个命令按钮(其Name属性为Comm...
  • 在窗体上画一个命令按钮,其名称为Command...
  • 为了使标签能自动调整大小以显示标题(Capt...