[填空题]有一个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=( +Val(Me!Text2)+Val(Me!Text3))/3 End Sub Private Sub Command3_Click（　） Docmd. __________ End Sub

更多"有一个VBA计算程序的功能如下，该程序用户界面由4个文本框和3个按钮组"的相关试题:

[填空题]有一个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=(__________ +Val(Me!Text2)+Val(Me!Text3))/3__________ End Sub Private Sub Command3_Click（　） Docmd. __________ End Sub

查看答案

[填空题]有一个VBA计算程序的功能如下：该程序用户界面由3个文本框和3个按钮组成，3个文本框的名称分别为Text1、Text2和Text3，3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1和Text2两个文本框中输入的数值的和并将结果存放在Text3文本框中；单击退出按钮则退出。请将下列程序填空补充完整。 Private Sub Command1_Click( ) Me!Text1="" Me!Text2="" Me!Text3="" End sub Private Sub Command2 Click( ) If Me!Text1=""Or Me! Text2=""Or Me! Text3=""Then MsgBOx"输入不全" Else Me!Text4=( [13] +Val(Me!Text2)) [14] End Sub Private Sub Command3 Click( ) DocmD [15] End Sub

查看答案

[填空题]有一个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

查看答案

[填空题]有一个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( )
DocmD1 (15)
End Sub

查看答案

我来回答:

提交