女性，32岁。反复中上腹疼痛3年余，多于进餐后30分钟开始，至下一餐前缓解，劳累或季节改变可有疼痛加剧，近2天粪便黑色、成形。粪隐血（+++），最可能的诊断是（）

A.胃溃疡并出血

B.十二指肠溃疡并出血

C.食管静脉曲张破裂并出血

D.急性胃黏膜病变

E.胃癌并出血

以下能够正确计算n!的程序是( )。

A) Private Sub Cornmand1_Click()
n=5:x=1
Do
X=X*i
i=i+1
Loop While icn
Print X
End Sub
B) Private Sub Command1_Click()
n=5:x=1:i=1
Do
x=x*i
i=i+1
Loop While i＜n
Print X
End Sub
C) Private Sub Command1_Click()
n=5:x=1:i=1
Do
x=x*i
i=i+1
Loop while i＜=n
Print X
End Sub
D) Private Sub Command1_Click()
n=5:x=1:i=1
Do
x=x*i
i=i+1
Loop While pn
Print X
End Sub