某患者确诊为急性白血病M3后住院治疗，一次因"感冒"注射药物后突然出现体表大片淤斑，且肌肉注射部位大片血肿，病人一般状态尚可。

用药3d后，病人的PT为16s（正常对照12s），APTT85s（正常对照36s），血小板78×10/L。该结果说明（）

A.病人骨髓造血功能恢复

B.病人仍存在内源性凝血障碍

C.病人病情仍未得到控制

D.病人病情开始得到控制，但仍应继续观察

E.病人PT高于正常，有出血危险，应停用肝素

单击一次命令按钮之后，下更程序代码的执行结果为______ 。
Public Sub Proc(a() As Integer)
Static i As Integer
Do
a(i) = a(i) + a(i + 1)
i=i+1
Loop While i ＜ 2
End Sub
Private Sub Command1_Cliek()
Dim m As Integer
Dim i As Integer
Dim x(10) As Integer
For i = 0 To 4
x(i) = i + 1
Next i
For i = 1 To 2
Call Proc (x)
Next i
For i = 0 To 4
Print x(i);
Next i
End Sub

A．3 4 7 5 6

B．3 5 7 4 5

C．1 2 3 4 5

D．1 2 3 5 7