单项选择题

设有如下程序：
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循环来计算一个表达式的值，这个表达式是______。

点击查看答案&解析