首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有一个VBA计算程序,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为Text1、Text2、Text3和Text4。3个按钮分别为清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单
有一个VBA计算程序,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为Text1、Text2、Text3和Text4。3个按钮分别为清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单
admin
2010-03-22
29
问题
有一个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
选项
答案
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方法。
转载请注明原文地址:https://jikaoti.com/ti/MzP0FFFM
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#inc1ude<iostream>usingnamespacestd;c1assMyClass{public:MyClass(intx):val(x){}voidPrint
下列关于C++预定义流对象的叙述中,正确的是()。
一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、C、D、E依次入栈,然后再依次出栈,则元素出栈的顺序是()。
下列选项中不属于结构化程序设计原则的是()。
执行下列语句段后,输出字符“*”的个数是()。for(inti=50;i>l;i-=2)cout
使用VC6打开考生文件夹下的源程序文件modi1.cpp,该程序运行时有错误,请改正程序中的错误,使得程序运行后没有内存遗漏。可以在修改处增加或者删除一条语句。本程序完成输入两个字符串,分别存储到s1,s2中。注意:不要改动main函数,不能增行
下面不能作为结构化方法软件需求分析工具的是
下面关于面向对象的程序设计方法中,正确的是()。
关系表中的每一行记录称为一个()。
在Access中,创建报表的三种方式______、使用向导功能和使用“设计”视图功能创建。
随机试题
按完全成本法确定的净利润总是()变动成本法确定的净利润。
根据宪法和国家赔偿法的规定,我国国家赔偿实行的归责原则是()
下列小说中,善用唐传奇手法以志怪的是()
在固定资产核算系统中,对输入的增减变动数据处理内容主要包括()。
从事会计工作的人员,必须具备一定的会计职称等级。()
以下不属于代理的分类的是()。
洛阳龙门石窟著名的“龙门二十品”中的十九品都在()。
中国以前能够走好脱贫之路,国力更为强大的今天同样能走好。只要有______的紧迫感和肯干、想干、苦干的精气神儿,就一定能打赢脱贫攻坚战,步履铿锵地迈向全面小康社会。填入画横线部分最恰当的一项是:
等比数列{an}的前n项和为sn,已知s1,2s2,3s3成等差数列,则{an}的公比为()
学問の楽しさは、苦しさの中()あるような気がする。
最新回复
(
0
)