本程序将顺序文件A:、MYFILE.TXT的内容一个字符一个字符地读入文本框txtTest中。请将程序补充完整。
Private Sub Form_Click()
Dim InputData As String
txtText.Text=""
______
Do While______
______
txtTest.Text = txtTest.Text +InputData
Loop
______
End Sub

肝硬化患者两个月前发现腹水，昨天突然出现剧烈腹痛，伴呕吐、发热，腹水迅速增加，并排出少量暗红色血便，最可能出现哪种情况（）。

A.食管静脉曲张破裂出血

B.急性胰腺炎

C.合并肝癌破裂

D.门静脉血栓形成

E.合并脾破裂出血