填空题
有一个VBA计算程序的功能如下，该程序用户界面由4个文本框和3个按钮组成。4个 文本框的名称分别为：Text1、Text2、Text3和Text4。3个按钮分别为：清除（名为 Command1）、计算（名为Command2）和退出（名为Command3）。窗体打开运行后， 单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2 和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中；单击 退出按钮则退出。请将下列程序填空补充完整。
Private Sub Command1_Click1 Me!Text1=""
Me!Text2=""
Me!Text3="" Me!Text4=""
End Sub
Private Sub Command2_Click2
If Me!Text1="" Or Me!Text2="" Or Me!Text3="" then
MsgBox "成绩输入不全"
Else
Me!Text4=( 3 +Val(Me!Text2)+Val(Me!Text3))/3 4
End Sub
Private Sub Command3_Click5 Docmd. 6
End Sub
1、
【正确答案】
1、Val(Me!Text1) End If Quit
【答案解析】由题目可知，Text4 中存放的是 3 科成绩的平均成绩，所以要把 3 个科目的成绩加起来除以 3，所以第 1 空应该填 Val(Me!Text1)，获得输入科目的成绩；If…Else…End If 语句中，缺少结束语句，所以第 2 空应该填 End If；Command3 的功能是退出，而退出有两种，一种是退出窗体，一种是退出 Access，如果 是退出窗体，则使用 Close 方法，如果是退出 Access，则使用 Quit 方法。