单项选择题

设有如下程序：
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的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) For n=1 T0 20 If n Mod 3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是
A．15
B．18
C．21
D．24
单项选择题
在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form Load( ) Show Text1.Text= Text1.SetFocus End Sub Pfivate Sub Form_MouseUp(BuHon As Integer，Shift As Integer，X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer，shift As Integer) Print Visua1 Basic ； End Sub 程序运行后，如果按“A”键，然后单击窗体，则在窗体上显示的内容是
A．VisualBasic
B．程序设计
C．A程序设计
D．Visual Basic程序设计
相关试题