A-A+
设有如下程序： Private Sub Command1 Click() Dim sum A
问题详情
设有如下程序： 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请帮忙给出正确答案和分析，谢谢！
参考答案
正确答案：C
解析：本题考查VBA中循环结构的知识。这类问题需要分析出每一次循环所做的操作。第一次循环时，i=l，n=0，x=O/1，所以累加上去的是0/1；第二次循环时，i=2，n=l，x=l/2，所以累加上去的是1/2；第三次循环时，i=3，n=2，x=2/3，所以累加上去的是2/3；循环5次后累加的应该是0/1+1/2+2/3+3/4+4/5。
