首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个数据库文件“samp3, accdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“fEmp”。同时,给出窗体对象“fEmp”上两个按钮的单击事件代码,请按以下要求补充设计。 (1)将窗体“fEmp”上名称为“tS
在考生文件夹下有一个数据库文件“samp3, accdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“fEmp”。同时,给出窗体对象“fEmp”上两个按钮的单击事件代码,请按以下要求补充设计。 (1)将窗体“fEmp”上名称为“tS
admin
2018-07-06
95
问题
在考生文件夹下有一个数据库文件“samp3, accdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“fEmp”。同时,给出窗体对象“fEmp”上两个按钮的单击事件代码,请按以下要求补充设计。
(1)将窗体“fEmp”上名称为“tSS”的文本框控件改为组合框控件,控件名称不变,标签标题不变。设置组合框控件的相关属性,以实现从下拉列表中选择输入性别值“男”和“女”。
(2)选择合适字段,将查询对象“qEmp”改为参数查询,参数为引用窗体对象“fEmp”上组合框“tSS”的输入值。
(3)将窗体对象“fEmp”上名称为“tPa”的文本框控件设置为计算控件。要求依据“党员否”字段值显示相应内容。如果“党员否”字段值为True,显示“党员”两个字;如果“党员否”字段值为False,显示“非党员”3个字。
(4)在窗体对象“fEmp”上有“刷新”和“退出”两个命令按钮,名称分别为“bt1”和“bt2”。单击“刷新”按钮,窗体记录源改为查询对象“qEmp”;单击“退出”按钮,关闭窗体。现已编写了部分VBA代码,请按VBA代码中的指示将代码补充完整。
注意:不要修改数据库中的表对象“tEmp”;不要修改查询对象“qEmp”中未涉及的内容;不要修改窗体对象“fEmp”中未涉及的控件和属性。
程序代码只允许在“*****Add*****"与"*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。
选项
答案
(1)【操作步骤】 步骤1:选择“窗体”对象,右键单击“fEmp”,从弹出的快捷菜单中选择“设计视图”命令。 步骤2:右键单击控件“tSS”,从弹出的快捷菜单中选择“更改为”下的“组合框”命令,然后右键单击“tSS”,从弹出的快捷菜单中选择“属性”命令,在“行来源类型”和“行来源”行分别输入“值列表”和“男;女”,如图4.329所示,关闭属性表,按Ctrl+S保存修改,关闭设计视图。 [*] (2)【操作步骤】 步骤1:选择“查询”对象,右键单击“qEmp”,从弹出的快捷菜单中选择“设计视图”命令。 步骤2:双击“*”和“性别”字段,添加到字段行,在“性别”字段的“条件”行输入“[ forms]![ fEmp]![tSS]”。如图4.330所示。 [*] 步骤3:按Ctrl+S保存修改,关闭设计视图。 (3)【操作步骤】 右键单击窗体对象“fEmp”,打开设计视图,右键单击文本框“tPa”,从弹出的快捷菜单中选择“属性”命令,在“控件来源”行输入“= IIf([党员否]=True,"党员","非党员")”,关闭属性表,如图4.331所示。 [*] (4)【操作步骤】 步骤1:右键单击命令按钮“刷新”,从弹出的快捷菜单中选择“事件生成器”命令,在弹出的对话框中选择“代码生成器”,进入编程环境,在空行输入以下代码: ’*****Add1***** Form.RecordSource = " qEmp" ’*****Add1***** 关闭界面。 步骤2:右键单击命令按钮“退出”,从弹出的快捷菜单中选择“事件生成器”命令,在弹出的对话框中选择“代码生成器”,进入编程环境,在空行内输入以下代码: ’*****Add2***** DoCmd.Close ’*****Add2***** 如图4.332所示,关闭界面。 [*] 步骤3:按Ctrl+S保存修改,关闭设计视图。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/QxMp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
Access默认的数据库文件夹是()。
下列关于类、对象、属性和方法的叙述中,错误的是()。
将Access数据库中的数据发布在Internet网络上可以通过______.
下列叙述中正确的是______。
ADO对象模型层次中可以打开RecordSet对象的是______。
执行下列语句段后y的值为()。x=3.14y=Len(Str$(x)+Space(6))
考生文件夹下有一个数据库文件"samp3.mdb",其中存在已经设计好的表对象"tEmployee"和"tGroup"及查询对象"qEmployee",同时还设计出以"qEmployee"为数据源的报表对象"rEmployee"。请在此基础上按照以下要求补
要显示格式为"页码/总页数"的页码,应当设置文本框控件的控件来源属性为()。
VBA提供了多个用于数据验证的函数,其中IsData函数用于合法日期验证:______函数用于判定输入数据是否为数值。
关于数据库系统叙述不正确的是()。
随机试题
人民币票面残缺1/5以上至1/2,其余图案文字能照样连接者的兑换标准是()
关于伤口二期愈合的瘢痕,下列哪些描述是正确的
胸椎结核截瘫的原因包括
羊水过多为羊水过少为
背景资料:某新建一级公路土方路基工程施工,该工程取土困难。K10+000~K12+000段路堤位于横坡陡于1:5的地面,施工方进行了挖台阶等地基处理,然后采用几种不同土体填料分层填筑路基,填筑至0~80cm,施工方选择细粒土,采用18t光轮压路机
李先生正在考虑投资三种共同基金。第一种是股票基金;第二种是长期政府债券与公司债券基金;第三种是收益率为8%的短期国库券货币市场基金。这些风险基金的概率分布如表3—5所示。基金的收益率之间的相关系数为0.10。根据案例,回答以下问题。最优资本
评估结构件和比较简单的大型冲压模具的常用方法是()。
关于保险合同中的保险人责任免除条款,以下说法中哪些是正确的?()
孙某丈夫外出做买卖五年未归,也没有任何音讯,孙某欲改嫁,下面说法正确的是()。
一个弹力球从128米的高处自由落下,每次着地后又跳到原来高度的一半落下,第6次着地到第7次着地所经过的路程为多少米?()
最新回复
(
0
)