单项选择题

设有如下程序：
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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个按钮Command1，编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1，2；3，4) j=1 For i=4 To Step-1 s=s+a(i)*j j=j*10 Next j Print s End Sub 运行程序后，最后的输出结果为( )。
A．1234
B．12
C．34
D．4321
单项选择题
视图设计一般有3种设计次序，下列不属于视图设计次序的是( )。
A．白顶向下
B．由内向外
C．由外向内
D．自底向上
相关试题