有一个VBA计算程序，该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为Text1、Text2、Text3和Text4。3个按钮分别为清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2和Text33个文本框中输入的3科成绩的平均成绩，并将结果存放在Text4文本框中，单击退出按钮则退出。请将下列程序填空补充完整。Private Sub Command
题目
有一个VBA计算程序，该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为Text1、Text2、Text3和Text4。3个按钮分别为清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2和Text33个文本框中输入的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＝(【 】＋Val(Me！Text2)＋Val(Me！Text3))/3
【 】
End Sub
Private Sub Command3_Click()
Docmd.【 】
End Sub
相似考题
更多“有一个VBA计算程序,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为Text1、Text2、 ”相关问题
-
第1题：
在窗体中添加一个名称为Text1的文本框，两个名称分别为Command1和Com mand2的命令按钮。要求程序运行后，用户向文本框中输入字母，单击Command1按钮则文本框中字母全部转换为大写；然后单击Command2按钮则文本框中字母全部转换为小写。请在【 】、【 】和【 】处填入适当的内容，将程序补充完整。
正确答案：Text1.Tag Ucase(Text1.Tag) Click
Text1.Tag , Ucase(Text1.Tag) , Click 解析：发生字母的转换是由于按扭的单击事件。故[15]处的事件应为Click。 命令按扭Command1实现的功能是将字母全部转换为大写，故需用UCase函数，根据语句Text1.Text＝LCase(Text1.Tag)可知 Text1.Tag是表示存放文本框中字符串的一个变量。故[13]处应填Text1. Tag，[14]处为 Ucase(Text1. Tag)。 -
第2题：
在考生文件夹中有一个工程文件execise95.vbp及窗体文件execise95.frm。请在名为 Form1的窗体上绘制3个文本框，其名称分别为Text1、Text2和Text3，文本框内容分别设置为“计算机等级考试”、Visua1Basic和空白。然后绘制两个单选按钮，其名称分别为 Opt1和Opt2，标题分别为Change和Join。编写适当的事件程序。
程序运行后，如果选中Change单选按钮并单击窗体，则Text1文本框中内容与Text2
文本框中内容进行交换，并在Text3文本框中显示OK(如下图所示)：如果选中Join单选按钮并单击窗体，则把Text1和Text2的内容按Text1在前，Text2在后的顺序连接起来，并在Text3文本框中显示连接后的内容。修改后的文件仍按原文件名保存在原文件夹下。
注意：
不得修改已经给出的程序。在结束程序运行之前，必须选中一个单选按钮，并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮，否则可能无成绩。
正确答案：
-
第3题：
在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text 1、Text2,然后编写如下程序:PrivateSubCommand1_Click()a=Text1.textb=Text2.textC=Lcase( )D=Ucase( )PrintC;DEndSub程序运行后,在文本框Text 1、Text2中分别输入AbC和Efg,结果是( )A、abcEFG
B.abcefg
C.ABCefg
D.ABCEFG
正确答案：A
-
第4题：
有一个VBA计算程序的功能如下：该程序用户界面由3个文本框和3个按钮组成，3个文本框的名称分别为Text1、Text2和Text3，3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1和Text2两个文本框中输入的数值的和并将结果存放在Text3文本框中；单击退出按钮则退出。请将下列程序填空补充完整。
Private Sub Command1_Click(
正确答案：
解析： 由题目可知，Text3中存放的是两个文本框数值的和，所以第1空应该填gal(Me!Text1)；If…Else…End If语句中，缺少结束语句，所以第2空应该填End If；Command3的功能是退出，而退出有两种，一种是退出窗体，一种是退出Access，如果是退出窗体，则使用Close方法，如果是退出Access，则使用Quit方法。 -
第5题：
在考生文件夹中有一个工程文件execise42.vbp和窗体文件execise42.frm。请在名为 Form1的窗体上绘制3个文本框，其名称分别为Text1、Text2和Text3，文本框内容分别设置为“二级考试”、“计算机”和空白：然后绘制2个单选按钮，其名称分别为opt1和 Opt2，标题分别为Change和Join，编写适当的事件程序。
要求在程序运行时，先单击Change单选按钮，使Text1文本框中内容与Text2文本框中内容进行交换，并使Change单选按钮消失；然后单击Join单选按钮，则把交换后的Text1和Text2的内容以Text1在前、Text2在后的顺序连接起来，并在Text3文本框中显示连接后的内容。如下图所示。
注意：
不得修改已经给出的程序。在结束程序运行之前，必须先单击Change单选按钮，后单击Join单选按钮。退出程序时必须通过单击窗体右上角的关闭按钮，否则可能无成绩。最后原名保存修改后的文件。
正确答案：