男性，66岁。5个月前起刺激性干咳，右上胸痛，呈进行性加重就诊。近2周来疼痛沿右肩向右上臂及前臂放射，并出现右额部不出汗、右眼难以睁开。体检：右侧瞳孔缩小，眼球内凹上睑下垂。右上肺叩浊，呼吸音降低。余肺清，心脏无阳性发现。X线示右肺尖团块影，边缘不清。

患者右上臂疼痛进一步加剧，肤色苍白，皮温降低，这是由于（）

A.肿块压迫锁骨下动脉

B.肿块压迫锁骨下静脉

C.肿块压迫腋动脉

D.肿块引起锁骨下动脉癌栓

E.肿块引起锁骨下动脉血栓

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：
Public x As Integer
Private Sub Commandl_Click()
x＝3
Call f1
Call f2
MsgBox x
End Sub
Private Sub f1()
X＝X*X
End Sub
Private Sub f2()
Dim x As Integer
x＝x+4
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。