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

歌德是德国十八世纪到十九世纪的伟大诗人。有一天他地韦玛公园里一小道上散步，正巧迎面碰上了一位他不满的文艺批评家。两人越走越近，这位批评家对歌德高声喊道：“我从来是不给傻子让路了!”“而我则恰恰相反!”歌德说完，欣然地让在小道的一旁。可见( )。

A．歌德是傻子

B．歌德比较懦弱

C．歌德以机智的言行表明恰恰是那位批评家是“傻子”

D．歌德非常狡猾