试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省临海市白云高级中学2018-2019学年高二下学期信息技术期中考试试卷
Private Sub Command1_Click()
Dim sum As Double, x As Double
sum = 0
n = 0
For i = 1 To 5
x = n / i
n = n + 1
sum = sum + x
Next
End Sub
该程序通过For循环计算sum的值，下列表达式的值与sum相等的是（ ）
Dim a(1 To 5) As Integer
a(5)=Val(Text1.text)
For i=4 To 1 Step -1
a(i)=a(i+1)\2
Next i
Label1.caption=str(a(1))
End sub
在文本框Text1中输入“100”,单击命令按钮Command1后,标签Label1中显示的内容是（ ）
试题篮
