单项选择题

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

A．1+1/2+2/3+3/4+4/5
B．1+1/2+2/3+3/4
C．1/2+2/3+3/4+4/5
D．1+1/2+1/3+1/4+1/5
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下代码： Option Base 1 Prirate Sub Command1_Click() d=0 c=10 x=Array(10,12,21,32,24) For i=1 To 5 If x(i)＞c Then d=d+x(i) c=x(i) Else d=d-c End If Next I Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为______。
A．89
B．99
C．23
D．77
单项选择题
在循环体中，可以使程序转让控制权，以便让操作系统处理其他的事件的语句是______。
A．Exit Do
B．DoEvents
C．End
D．Unload
相关试题