男性，35岁，剑突下隐痛3年，与饮食有关，间有黑便，实验室检查：HGB75g／L，WBC5．9×10⁹／L，PLT130×10⁹／L，MCV65fl，MCHC29％，肝功能正常，贫血的可能原因是（）

A.营养不良性贫血

B.缺铁性贫血

C.慢性肝病贫血

D.巨幼细胞贫血

E.溶血性贫血

以下程序的功能是：把顺序文件smtext1.txt的内容全部读入内存，并在文本框Text1中显示出来。请填空。
Private Sub Command1_Click()
Dim inData As String
Text1.Text=" "
Open"smtext1.txt" (13) As (14)
Do While (15)
Input #2 ,inData
Text1.Text=Text1.Text＆inData
Loop
Close #2
End Sub