患者日晡潮热，脘腹硬满疼痛，大便秘结，神昏谵语，狂躁妄动，舌红苔焦黄，脉沉数有力，宜诊为（）。

A.胃火亢盛证

B.痰火扰心证

C.肠道湿热证

D.肠热腑实证

E.食滞胃肠证

窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。
Private Sub Command1_Click()
Dim a
a=Array(1，2，3，4，5)
For k=1 To 4
S=S+a(k)
Next k
Print S
End Sub

A．10

B．14

C．15

D．120