首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有一个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
2009-05-20
79
问题
有一个VBA计算程序的功能如下,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4。3个按钮分别为:清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Textl、Text2和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中;单击退出按钮则退出。请将下列程序填空补充完整。
Private Sub Commandl_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
Ne!Text4=(【 】+Val(Me!Text2)+Val(Me[Text3))/3
【 】
End Sub
Private Sub Command3_Click()
Docmd.【 】
End Sub
选项
答案
Val(Me!Text1)或Val(Text1) End If Close或Quit
解析
本题考查考生按要求设计程序的能力。命令按钮Command1的Click事件是将窗体中的四个文本框中内容全部清空,命令按钮Command2的Click事件判断文本框Text1、Text2和Text3的内容是否为空,如果为空则使用MsgBox来输出提示信息,如果不为空则将将其内容从字符串转化为数值进行求和计算,并计算其平均值,将结果传递给文本框Text4。命令按钮Command3的Click事件是要实现窗体的退出或关闭操作。位置语句的作用给出文本框Text1中的成绩,从后面内容可以判断此处应该填写: Val(Me!Text1),非常简单,一般考生都能正确回答。位置语句的作用是结束If…Else分支结构,所以应该填写End If。位置语句的作用是用来退出窗体,所以可以使用DoCmd.Close或者DoCmd.Quit。考生注意 Close和Quit的区别,Close只是退出当前窗体,而Quit则将退出Access。当前为打印模式
转载请注明原文地址:https://kaotiyun.com/show/ar5p777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#includeusingnamespacestd;classBase{public:voidfun(){cout
下列选项中,正确的C++表达式是
已知主函数中通过如下语句序列实现对函数模板swap的调用:inta[10],b[10];swap(a,b,10);下列对函数模板swap的声明中,会导致上述语句序列发生编译错误的是
有如下类定义:classMyClass{public:private:intdata;};若要为MyClass类重载流输入运算符">>",使得程序中可以"cin>>obj;"的形式改变MyClass类的对象ob
派生类的对象对它的基类成员中()是可以访问的。
在长度为n的有序线性表中进行二分查找,最坏情况下需要比较的次数是()。
A、投影B、交C、选择D、并A用于查询的3个操作无法用传统的集合运算表示,引入的运算为投影运算、选择运算、笛卡尔积。常用的扩充运算有交、除、连接及自然连接等。投影,从关系模式中指定若干个属性组成新的关系,题目中从R中指定AB组成新的关系T,故A选项
一个工作人员可使用多台计算机,而一台计算机被多个人使用,则实体工作人员与实体计算机之间的联系是()。
一个工作人员可以使用多台计算机,而一台计算机可被多个人使用,则实体工作人员与实体计算机之间的联系是()。
下面不属于软件需求分析阶段工作的是
随机试题
下列属于牙周疾病的二级预防,除了
A.苯妥英B.氯霉素C.舒林酸D.利多卡因E.阿苯达唑
甲、乙签订了一份借款合同,甲为借款人,乙为出借人,借款数额为500万元,借款期限为2年。丙、丁为该借款合同进行保证担保,担保条款约定,如果不能如期还款,丙、丁承担保证责任。戊对甲、乙的借款合同进行了抵押担保,担保物为一批布匹(价值300万元),未约定担保范
大多数国家采用( )管辖权。
根据《上市公司重大资产重组管理办法》,上市公司发行股份的价格不得低于市场参考价的90%。市场参考价为本次发行股份购买资产的董事会决议公告前()的公司股票交易均价之一。I.20个交易日Ⅱ.30个交易日Ⅲ.60个交易日
二次函数y=f(x)满足f(x+1)-f(x)=2x,且f(0)=1.在区间[-1,1]上,函数y=f(x)的图像恒在直线y=2x+m下方,求实数m的取值范围.
2015年年初,安徽省在全省乡镇全面试行“党代会年会制”。截至目前,全省已有200多个乡镇陆续召开了年度党代会。实践表明,“党代会年会制”是扩大党内民主,拓展()发挥作用的平台。
Darwinproposedthetheoryofsexualselectiontoexplaintheoriginofostentatiousplumageincertainbirdspecies,mai
Massivechangesinalloftheworld’sdeeplycherishedsportinghabitsareunderway.Whetherit’soneofLondon’sparksfullof
A、Todrivethecarautomatically.B、Tomeasurethedriver’spulse.C、Topreventcaraccidents.D、Tomonitorthedriver’shealth.
最新回复
(
0
)