有一个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 Sub Private Sub Command2_Click( ) If Me!Text1=""Or Me! Text2=""Or Me! Text3=""Then MsgBox“成绩输入不全” Else Me!Text4=( [13] +Val(Me!Text2) +Val(Me!Text3) ) /3 [14] End Sub Private Sub Command3_Click( ) DocmD [15] End Sub
参考答案：[13]Val(Me!Text1) [14]End If [15]Quit
解析： 由题目可知，Text4中存放的是3科成绩的平均成绩，所以要把 3个科目的成绩加起来除以3，所以第1空应该填Val(Me!Text1)，获得输入科目的成绩；If…Else…End If语句中，缺少结束语句，所以第2空应该填End If；Command3的功能是退出，而退出有两种，一种是退出窗体，一种是退出Access，如果是退出窗体，则使用Close方法，如果是退出Access，则使用Quit方法。