首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为C1)、计算(名为C2)和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清除
有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为C1)、计算(名为C2)和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清除
admin
2013-02-04
52
问题
有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为C1)、计算(名为C2)和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清除所有文本框中显示的内容;单击“计算”按钮,则计算在Text1、Text2和Text3三个文本框中输入的3个数字的和并将结果存放在名为Text4的文本框中;单击“退出”按钮则退出程序。请将下列程序填空补充完整。
Private Sub C1_Click()
Me!Text1=“”
Me!Text2=“”
Me!Text3=“”
Me!Text4=“”
End Sub
Private Sub C2_Click()
If Me!Text1=“”Or Me!Text2=“”Or Me!Text3=“”Then
MsgBox”三个文本框都要输入值!”
___________
Me!Text4=(Val(Me!Text1)+Val(Me!Text2)+___________)
EndIf
End Sub
Private Sub C3_Click()
Docmd___________
End Sub
选项
答案
E1se Val(Me!Text3) Close
解析
本题考查有关VBA中程序设计的知识。对于这个问题,首先由于满足If分支的条件也就是如果有文本框内容为空则会弹出消息框提示信息,而若条件不满足也就是说三个文本框中都有值时应该计算三个文本框之和,所以第1空处应填Else。要计算三个文本框之和,也就是把3个文本框中的内容转换成数值后相加,所以第2空处应填Val(Me!Text3)。最后一个命令按钮的作用是退出窗体,在VBA中关闭窗体应该使用命令DoCmd.close,所以第3空处应填Close。
转载请注明原文地址:https://kaotiyun.com/show/zlup777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在分析建立数据库目的时,应该______。
字段说明用于对字段作进一步的描述,该说明显示在______上。
算法的时间复杂度是指______。
设计数据库的逻辑结构模式时,首先要设计好______,然后再设计好各个______。
在SQL中,每个视图中的列可以来自不同的______,它是在原有表的基础上的逻辑意义上的新关系。
用于执行指定的外部应用程序使用的宏命令是()。
在有参数函数设计时,要想实现某个参数的“双向”传递;就应该说明该形参“传址”调用形式,其设置选项是()。
SQL(结构化查询语言)是在数据库系统中应用广泛的数据库查询语言,它包括了数据定义、数据查询、【】和【】4种功能。
模块包含了一个声明区域和一个或多个子过程(Sub开头)或函数过程(以【】开头)。
一些重要的程序语言(如C语言和Pascal语言)允许过程的递归调用。而实现递归调用中的存储分配通常用______。
随机试题
在输油气管道采用钢套管时,套管间应按设计要求设绝缘支撑进行电绝缘,并用()兆欧表进行绝缘检查。
下列肝脏生物转化作用的论述,正确的是
“经营单位”栏:()。“随附单据”栏:()。
朝晖汽车制造公司为了获取成本优势,与汽车发动机供应商建立了良好关系,保证生产进度不受影响;所需外购配件由就近的泰这公司提供,减少了运输费用;内部各个配件厂分布在总装厂周围,建立大规模生产线实现规模经济。该公司的上述做法涉及其价值链中的(
物理层实现的主要功能在于提出了物理层的()。
下列()属于非智力因素。
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好“tNorm”和“tStock”两个表对象。试按以下要求完成设计:(1)创建一个查询,查找产品最高储备与最低储备相差最小的数量并输出,标题显示为“mdata”,所建查询命名
由若干零件组成的、具有一定功能的部分为系统的部件,而零件可用于不同的部件,则实体部件和实体零件之间的联系是()
OnlineAdsAfteradecadeofexperimentation,companieshaveyettofindareliablewaytoburnishtheirbrandsonline.Rese
•Listentothemanagertalkingtostaffaboutthewaytheyanswerthetelephone.•Foreachquestion(23-30),markoneletter
最新回复
(
0
)