女性，61岁，支气管哮喘史20年。6天前再次发作，经治疗后症状完全消失。2小时前突感左胸剧痛，继之呼吸困难、发绀、大汗、烦躁。血压90/60mmHg，气管右移，左肺呼吸音减低。病人最大可能是（）

A.急性肺炎合并胸膜炎

B.急性肺栓塞

C.自发性气胸

D.急性肺不张

E.急性心肌梗死

下面程序运行时，单击窗体后，窗体上显示的结果是( )。
Private Sub Form_Click()
Dim I As Integer
Dim sum As Long
sum=0
For I=10 To 16
If I Mod 3=0 OrI Mod 5=0 Then
sum=sum+I
End If
Next I
Print sum
End Sub

A．10

B．12

C．37

D．22