首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为 G1)、计算(名为C2)和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清
有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为 G1)、计算(名为C2)和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清
admin
2010-03-22
38
问题
有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为 G1)、计算(名为C2)和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清除所有文本框中显示的内容;单击“计算”按钮,则计算在Wext1、Text2和Text3三个文本框中输入的3个数字的和并将结果存放在名为Text4的文本框中;单击“退出”按钮则退出程序。依据上述功能,请将下列程序补充完整。
Private Sub C1 Click()
Me!Text1=""
Me!Text2=""
Me!Text3=""
Me!Text4=""
End Sub
Private Sub C2 Click()
IfMe!Text1=""Or Me!Text2=""Or Me!Text3=""Then
MsgBox"三个文本框都要输入值!"
______
Me!Text4=(Val(Me!Text1)+Val(Me!Text2)+______)
End If
End Sub
Private Sub C3 Click()
Docmd.
End Sub
选项
答案
Else Val(Me!Text3) Close
解析
本题考查有关VBA中程序设计的知识。对于这个问题,首先由于满足If分支的条件也就是如果有文本框内容为空则会弹出消息框提示信息,而若条件不满足也就是说三个文本框中都有值时应该计算三个文本框之和,所以第1空处应填Else。要计算三个文本框之和,也就是把3个文本框中的内容转换成数值后相加,所以第 2空处应填Val(Me!Text3)。最后一个命令按钮的作用是退出窗体,在VBA中关闭窗体应该使用命令 DoCmd.Close,所以第3空处应填Closeo。
转载请注明原文地址:https://jikaoti.com/ti/VPP0FFFM
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
逻辑模型是面向数据库系统的模型,下面属于逻辑模型的是
有如下类定义:classBase{public:inta;protected:intb;private:intc;};classDerived:
有如下类声明:classHow{intk;public:~How(){cout
下列关于运算符函数的描述中,错误的是()。
在函数中,可以用auto、extern、register和static这四个关键字中的一个来说明变量的存储类型,如果不说明存储类型,则默认的存储类型是()。
若整型变量a、b、C、d中的值依次为:1、4、3、2。则条件表达式a
下列叙述正确的是()。
数据库设计中反映用户对数据要求的模式是( )。
在下面的4个关键字中用来说明虚函数的是()。
在下列枚举符号中,用来定位文件开始位置的方式是
随机试题
ItwasinSanFranciscothatImetBob.
下列属于长骨的是
某患者女性,38岁,检测血钙升高,全身骨密度降低,多发性肾结石。初步诊断考虑为
某建设工程施工招标,甲公司中招后将其转包给不具有相应资质等级的乙公司,乙施工过程不符合规定的质量标准,给建设单位造成损失。关于向建设单位承担赔偿责任的说法,正确的是()。
以下关于防火卷帘的消防联动控制设计描述正确的是()。
财政部门零余额账户每日发生的支付,于当日营业终了前与国库单一账户清算,并做到()。
下面有关显示器主要性能参数的叙述中,错误的是( )。
Understandinghownaturereactstoclimate(气候)changewillrequirecheckingkeylifecycleevents--flowering,theappearanceof
MynameisMohsen.IamfromCario,butthreeweeksagoIsaidgoodbyetomyfamilyandgotonaplanetotheU.S.Now1amstud
【B1】【B20】
最新回复
(
0
)