男，30岁，突发性中上腹刀割样疼痛3小时，体检：全腹部压痛、反跳痛、肌紧张。行腹部立位摄片发现膈下游离气体。推测该病人的腹膜炎产生的原因是

A．膈下脓肿
B．肠间脓肿
C．盆腔脓肿
D．脾破裂
E．胃十二指肠穿孔

窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。

现有如下程序：
Public Sub display(x As Control)
If TypeOf x is Label Then
x Caption = "计算机等级考试"
Else
xPicture = LoadPicture ( "pic. jpg" )
End If
End Sub
Private Sub Label1_Click()
Call display(Label1)
End Sub
Private Sub Picture1_Click()
Call display(Picture1)
End Sub
对以上程序，下列叙述中错误的是( )。

A) 程序运行时会出错
B) 单击图片框，在图片框中显示一幅图片
C) 过程中的x是控件变量
D) 单击标签，在标签中显示一串文字