完成下面的程序，使显示结果如下图所示。
Private Sub Form_Click()
FontSize=18
Samples=" [8] "
x=(ScaleWidth_TextWidth(Samples))/2
y=(ScaleHeight_TextHeight(Samples))/2
CurrentX=x
CurrentY=y
[9] Sample$
End Sub

男性，60岁，5个月前出现反复的上腹部不适、恶心、腹胀、食欲不振，在单位医务室所以“胃肠炎”治疗未见好转。近来消瘦明显，退休体检时B超发现胰腺体尾部肿块，轮廓不规则。诊断为：胰腺癌

应用肠外营养支持疗法，在输液结束时，可用何种药物封管

A．高渗盐水

B．葡萄糖液

C．注射用水

D．肝素稀释液

E．止血敏稀释液