单项选择题

设有如下程序： Private Sub Command1_Click() Dim sum As Double，x As Double sum=0 n=0 Fori=1 To 5 x=n/i n=n+1 sum=sum+x Nexti 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

<上一题目录下一题>

热门试题

填空题

数组Dim x(3，-1 to 1,6)包含元素的个数有【7】。

填空题

在数据访问页中，对于不可更新的数据，一般使用【8】显示数据。

相关试题