有一个VBA计算程序的功能如下，该程序用户界面由4个文本框和3个按钮组成。4个 文本框的名称分别为：Text1、Text2、Text3和Text4。3个按钮分别为：清除（名为 Command1）、计算（名为Command2）和退出（名为Command3）。窗体打开运行后， 单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2 和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中；单击 退出按钮则退出。请将下列程序填空补充完整。Private Sub Command1_Click() Me!Text1="" Me!Text2="" Me!Text3="" Me!Text4="" End SubPrivate Sub Command2_Click()If Me!Text1="" Or Me!Text2="" Or Me!Text3="" thenMsgBox "成绩输入不全" Else Me!Text4=(__________ +Val(Me!Text2)+Val(Me!Text3))/3__________End SubPrivate Sub Command3_Click() Docmd. __________End Sub

患者左上颌牙咀嚼不适半年，2天前左上颌后牙区出现自发性剧烈，持续的跳痛，牙伸长感，不敢咬，检查见面深龋，无痛，Ⅱ度松动，叩(+++)，根尖部牙龈微红，X线片示根尖有边界不清的透光区，拟诊为（）

A．慢性根尖周炎急性发作

B．急性牙髓炎

C．慢性牙髓炎

D．急性咬创伤

E．以上都不是