单选题设有如下程序：
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、 l+1/2+2/3+3/14+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

【正确答案】 C

【答案解析】[解析] 解答此题需要细心观察程序流程。
变量Sum和n的初始值都为0，在进行第一次循环时，x=n/i(i=1)，结果为0，n=n+1，n值为1，sum=sum+x，sum值为0；在进行第二次循环时，x=n/i(i=2)，x的值为1/2，n=n+1，n值为2，则sum值为1/2；第三次循环中，x=n/i(i=3)，x的值为2/3，n=n+1，n值为3，则sum值为1/2+2/3；依此类推，直至循环结束。最后sum的值应为1/2+2/3+3/4+4/5的结果，所以正确答案为C。