单选题设有如下程序： Private Su b Commandl 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

【正确答案】 D

【答案解析】Case表达式可用如下4种形式： ①单一数值或并列的数值，用来与“表达式”的值比较，成员间以逗号隔开。 ②由关键字‘TO分隔开的两个数值或表达式之间的范围。 ③关键字lS接关系运算符，后面再接变量或精确的值。 ④关键字Case else后的表达式，是在前面Case条件不满足时执行的。