如果一患者外周血出现幼红幼粒细胞、泪滴状红细胞，骨髓干抽，脾肿大。主要考虑为：（）

A.脾淋巴瘤

B.慢性粒细胞性白血病

C.骨髓纤维化

D.溶血性贫血

E.再生障碍性贫血

设有如下程序：

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