[单项选择题] 设有如下程序： Private Sub Command1_Click() Dim sum As Double, x As Double sum=0 n=0 For i=1 To 5x

[单项选择题] 设有如下程序：
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循环计算一个表达式的值，这个表达式是______。

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

参考答案：

C

问题解析:

[评析] 本题考查循环语句，其过程如下： i=1时，x=0/1=0，n=0+1=1，sum=0+0； i=2时，x=1/2，n=1+1=2，sum=0+1/2； i=3时，x=2/3，n=2+1=3，sum=0+1/2+2/3； i=4时，x=3/4，n=3+1=4，sum=0+1/2+2/3+3/4； i=5时，x=4/5，n=4+1=5，sum=0+1/2+2/3+3/4+4/5。