首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStudent”,同时还设计出窗体对象“fQuery”、“fStudent”和“fCount”。请在此基础上按照以下要求补充“fQuery”和“.fCount”窗体的设计。
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStudent”,同时还设计出窗体对象“fQuery”、“fStudent”和“fCount”。请在此基础上按照以下要求补充“fQuery”和“.fCount”窗体的设计。
admin
2016-08-22
17
问题
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStudent”,同时还设计出窗体对象“fQuery”、“fStudent”和“fCount”。请在此基础上按照以下要求补充“fQuery”和“.fCount”窗体的设计。
(1)加载“fQuery”时重置窗体标题并改为“显示查询信息”,将窗体中“退出”命令按钮(名称为“命令7”)上显示的文字颜色自动改为红色(红色值为255),字体粗细改为“加粗”(加粗值为700)。请按照VBA代码中的指示将实现此功能的代码补充完整。
(2)在“fQuery”窗体距主体节上边0.4cm、左边0.4cm的位置添加一个矩形控件,其名称为“rRim”;矩形宽度为16.6cm、高度为1.2cm、特殊效果为“凿痕”。将窗体边框改为“对话框边框”样式,取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线。
(3)在“fQuery”窗体中有一个“显示全部记录”命令按钮(名称为bList),单击该按钮后,应实现将“tStudent”表中的全部记录显示出来的功能。现已编写了部分VBA代码,清按照VBA代码中的指示将代码补充完整。
要求:修改后运行该窗体,并查看修改结果。
(4)在“fCount”窗体中有两个列表框、一个文本框和一个命令按钮,名称分别为“List0”、“List1”、“tData”和“cmd”。在“tData”文本框中输入一个数,单击“Cmd”按钮,程序将判断输入的值是奇数还是偶数,如果是奇数,将填入“List0”列表中,否则填入“List1”列表中。
根据以上描述,请按照VBA代码中的指示将代码补充完整。
注意:不允许修改窗体对象“fQuery”、“fStudent”和“fCount”中未涉及的控件、属性;不允许修改表对象“tStudent”。程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。
选项
答案
(1)【操作步骤】 步骤1:选择“窗体”对象,右键单击“fQuery”窗体,在弹出的快捷菜单中选择“设计视图”命令,打开设计视图。 步骤2:双击标尺相交处的“窗体选择器”,打开“属性表”对话框,在该对话框中单击“事件”选项卡,然后单击该选项卡下的“加载”行右侧的事件生成器按钮,进入VBA代码编辑区。 步骤3:在“*****Add1*****”区域的空白行中输入“Me.caption="显示查询信息"”;在“’*****Add2*****”区域的空白行中输入“Me.命令7.ForeColor=255”;在“’*****Add3*****”区域的空白行中输入“Me.命令7.FontWeight=700”。 步骤4:单击快速工具栏中的“保存”按钮,然后关闭VBA代码编辑区。 步骤5:单击快速工具栏中的“保存”按钮,然后关闭“设计视图”。 (2)【操作步骤】 步骤1:选择“窗体”对象,右键单击“fQuery”窗体,在弹出的快捷菜单中选择“设计视图”命令。 步骤2:单击“设计”选项卡下“控件”组中的“其他”下拉按钮,然后单击控件组中的“矩形”按钮,最后单击窗体主体节区的任意区域。 步骤3:右键单击刚画好的“矩形”,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,单击该对话框下的“全部”选项卡,在该选项卡的“名称”行中输入“rRim”,在“宽度”行中输入“16.6cm”,在“高度”行中输入“1.2cm”,在“上边距”行中输入“0.4cm”,在“左”行中输入“0.4cm”,在“特殊效果”行中选择“凿痕”。 步骤4:双击标尺相交处的“窗体选择器”,弹出“属性表”对话框,在该对话框中单击“格式”选项卡,在该选项卡的“边框样式”行中选择“对话框边框”,在“滚动条”行中选择“两者均无”,在“记录选择器”行中选择“否”,在“导航按钮”行中选择“否”,在“分隔线”行中选择“否”。 步骤5:关闭“属性表”对话框。单击快速工具栏中的“保存”按钮。 (3)【操作步骤】 步骤1:右键单击“显示全部记录”命令按钮,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,单击该对话框下的“事件”选项卡,然后单击该选项卡下“加载”行右侧的事件生成器按钮,进入VBA代码编辑区。 步骤2:在“*****Add4*****”区域的“BBB.Fonn.RecordSource="”行后输入“select*from tStudentII"”。 步骤3:单击快速工具栏中的“保存”按钮,然后关闭VBA代码编辑区。 步骤4:单击快速工具栏中的“保存”按钮,然后关闭“设计视图”。 (4)【操作步骤】 步骤1:选择“窗体”对象,右键单击“fCount”窗体。在弹出的快捷菜单中选择“设计视图”命令。 步骤2:右键单击“Cmd”按钮,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,单击该对话框下的“事件”选项卡,然后单击该选项卡的“单击”行右侧的事件生成器按钮,进入VBA代码编辑区。 步骤3:在“’*****Add*****”区域的空白行中输入“If x Mod 2=1 Then”。 步骤4:单击快速工具栏中的“保存”按钮,然后关闭VBA代码编辑区。 步骤5:单击快速工具栏中的“保存”按钮,然后关闭“设计视图”。
解析
转载请注明原文地址:https://kaotiyun.com/show/FNBD777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
下列关于法律关系的表述不能成立的是
下列选项中,属于我国宪法规定的土地制度内容的是
下列选项中,属于人民法院工作制度的是
清末的商事立法第一阶段由哪些人负责()
简述南京国民政府时期诉讼审判制度的特点。
唐朝官员的致仕年龄为()
夏商时期国家的出现,在中国法制起源阶段具有的意义是()。
下列等式或不等式中正确的共有
若两台服务器系统可用性分别达到99.9%和99.99%,那么下面关于两台服务器每年停机时间的描述中正确的是()。
下面是一个Applet程序,其功能是根据给出的小时,分钟和秒数计算相等的秒数,即将1分钟化为60秒,依此类推。要求建立一个时间类,时间参数均作为类的成员变量,并且给出换算时间的方法,也作为这个类的成员函数,可以供外部对象进行调用。同时还需要在输出窗口中显示
随机试题
A.抗菌谱窄,不耐酸,不耐青霉素酶B.抗菌谱窄,不耐酸,耐青霉素酶C.抗菌谱窄,耐酸,耐青霉素酶D.抗菌谱广,不耐酸,不耐青霉素酶E.抗菌谱广,耐酸,不耐青霉素酶氨苄西林的抗感染作用特点是
简述私放在押人员罪与徇私枉法罪的区别。
甲工程建设项目位于直辖市,为依法必须招标的全额国有资金投资项目。招标人采用公开招标方式并首先进行资格预审。在规定的资格预审申请截止时间前,共收到了12份资格预审申请文件。招标人根据《招标投标法实施条例》第十八条的规定,组建了资格审查委员会。审查中发现申请人
监事会至少每年召开()次会议。
美育的基本任务不包括()。
制度经济学派认为,经济增长的决定性因素是()。
设是从总体X中取出的简单随机样本X1,…,Xn的样本均值,则是μ的矩估计,如果
ADSL技术可以充分利用现有电话线网络,只要在用户端加装相关设备即可为用户提供服务。请从以下术语选择适当的编号,将图2-25拓扑结构中(1)~(4)空缺处的设备名称填写完整。供选择的答案:A.程控交换机B.普通二层交换机C.
若x和y是两个整型变量,在执行了语句序列:x=5;y=6;y+=x--;后,x+y的值为______。
SinceWorldWarTwo,especiallyinthelastfewdecadesofthe20thcentury,largegroupsofforeignershavecomeandsettledin
最新回复
(
0
)