35岁男性，右眼痛2个月。CT示有泪腺增大，边缘模糊，眶壁骨质正常，增强扫描示泪腺轻度增强，最可能的诊断是（）

A.泪腺混合瘤

B.泪腺型炎性假瘤

C.格雷夫斯肩（Grave’s病））

D.泪腺癌

E.泪腺血管瘤

在窗体中添加一个命令按钮，名称为Command1；添加一个文本框，名称为Text1，然后编写如下程序：
Private Sub Commandl Click()
Dim a(5)， b(5)
For j = 1 To 4
a(j) = 3 ( j
b(j) = a(j) ( 3
Next j
Text1.Text = b(j\2)
End Sub
程序运行后，单击命令按钮，在文本框中显示

A．25

B．18

C．36

D．35