单项选择题

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

单项选择题
设有如下窗体单击事件过程： Private Sub Form Click( ) a＝1 For i＝1 To 3 Select Case i Case 1,3 a＝a+1 Case 2,4 a＝a+2 End Select Next i MsgBox a End Sub 打开窗体运行后，单击窗体，则消息框的输出结果是______。
A．3
B．4
C．5
D．6
单项选择题
在窗体中添加一个名为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click( ) a＝75 If a＞60 Then k＝1 ElseIf a＞70 Then k＝2 ElseIf a＞80 Then k＝3 ElseIf a＞90 Then k＝4 EndIf MsgBOx k End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。
A．1
B．2
C．3
D．4
相关试题