单项选择题

设有如下程序：

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 i

End Sub

该程序通过For循环来计算一个表达式的值，这个表达式是( )。

A) 1+1/2+2/3+3/4+4/5
B) 1+1/2+1/3+1/4+1/5
C) 1/2+2/3+3/4+4/5
D) 1/2+1/3+1/4+1/5

<上一题目录下一题>

热门试题

单项选择题

如果要求在页面页脚中显示的页码形式为“第x页，共y页”，则页面页脚中的页码的控件来源应该设置为( )。

A) ="第"& [Pages] &"页，共"& [Page] &"页"
B) ="共"& [Pages] &"页，第"& [Page] &"页"
C) ="第"& [Page] &"页，共"& [Pages] &"页"
D) ="共"& [Page] &"页，第"& [Pages] &"页\

单项选择题

设变量x是一个整型变量，如果Sgn(x)的值为1，则x的值是( )。

A) 1
B) 大于0的整数
C) 0
D) 小于0的整数

相关试题