国家二级VB机试（上机操作）模拟试卷276
基本操作题
1.在考生文件夹下，存在一个数据库文件“samp1．accdb”，里边已经设计好了表对象“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”，同时还设计了窗体对象“fSubscr4be”。试按以下操作要求，完成各种操作。
(1)分析“tSubscribe”预约数据表的字段构成，判断并设置其主键。设置“科室ID”字段的字段大小，使其与“tOffice”表中相关字段的字段大小一致。删除医生“专长”字段。
(2)设置“tSubscribe”表中“医生ID”字段的相关属性，使其输入的数据只能为第1个字符为“A”，从第2个字符开始后三位只能是0～9之间的数字，并设置该字段为必填字段。设置“预约日期”字段的有效性规则为：只能输入系统时间以后的日期。
要求：使用函数获取系统时间。
(3)设置“tDoctor”表中“性别”字段的默认值为“男”，并设置该字段值的输入方式为从下拉列表中选择“男”或“女”选项值。设置“年龄”字段的有效性规则和有效性文本，有效性规则为：输入年龄必须在18岁至60岁之间(含18岁和60岁)，有效性文本内容为：“年龄应在18岁到60岁之间”。
(4)设置“tDoctol”表的显示格式，使表的背景颜色为“褐色2”，网格线为“黑色”。设置数据表中显示所有字段。
(5)通过相关字段建立“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”等四表之间的关系，并实施参照完整性。
(6)将窗体“fSubscribe”主体节区内文本框“tDept”和“tDoct”的控件来源属性设置为计算控件。要求该控件可以根据窗体数据源里的“科窜ID”和“医生ID”字段值，分别从非数据源表对象“tPatient”和“tDoctor”中检索出对应的科室名称和医生姓名并显示输出。
提示：考虑使用DLookup函数。
(1)【操作步骤】
步骤1：选择“表”对象，右键单击“tSubscribe”表，在弹出的快捷菜单中选择“设计视图”命令。
步骤2：右键单击“预约ID”行的任一点，在弹出的快捷菜单中选择“主键”命令，如图4．1所示。然后单击快速访问工具栏中的“保存”按钮。
[*]
步骤3：选择“表”对象，右键单击“tOffice”表，在弹出的快捷菜单中选择“设计视图”命令。单击“科室ID”行任一点，记录下其“常规”选项卡的“字段大小”行的值“8”，然后关闭“tOffice”表。
步骤4：单击“科室ID”行任一点，然后在其“常规”选项卡的“字段大小”行中输入刚刚记录的值“8”，如图4．2所示。
[*]
步骤5：单击快速访问工具栏中的“保存”按钮，在弹出的“Microsoft Access”的对话框中单击“是”按钮，最后关闭“tSubscfibe”表。
步骤6：选择“表”对象，右键单击“tDoctor”表，在弹出的快捷菜单中选择“设计视图”命令。
步骤7：右键单击“专长”行的任一点，在弹出的快捷菜单中选择“删除行”命令，如图4．3所示，在弹出的“Microsoft Access”的对话框中单击“是”按钮，然后单击快速访问工具栏中的“保存”按钮，最后关闭“tSubscfibe”表。
[*]
(2)【操作步骤】
步骤1：选择“表”对象，右键单击“tSubscribe”表，在弹出的快捷菜单中选择“设计视图”命令。
步骤2：单击“医生ID”行任一点，在其“常规”选项卡的“输入掩码”行中输入“\\
解析：
简单应用题
2.在考生文件夹下，存在一个数据库文件“samp2．accdb”，里而已经设计好表对象“tDoctor”、“tOffice”、“tPatient”和“tSubscribe”，同时还设计出窗体对象“fQuery”。试按以下要求完成设计。
(1)创建一个查询，查找姓名为两个字的姓“王”病人的预约信息，并显示病人的“姓名”、“年龄”、“性别”、“预约日期”、“科室名称”和“医生姓名”，所建查询命名为“qT1”。
(2)创建一个查询，统计星期一预约病人的平均年龄，要求输出一列内容，显示标题为“平均年龄”，所建查询命名为“qT2”。
(3)创建一个查询，查找预约了但没有留下电话的病人，并显示“姓名”，所建查询命名为“qT3”。
注意：病人的姓名不允许重复显示。
(4)现有一个已经建好的“fQuery”窗体，运行该窗体后，在文本框(文本框名称为tName)中输入要查询的医生姓名，然后按下“查询”按钮，即运行一个名为“qT4”的查询。“qT4”杳询的功能是显爪所查医生的“医生姓名”和“预约人数”两列信息，其中“预约人数”值由“病人ID”字段统计得到，请设计“qT4”查询。
(1)【操作步骤】
步骤1：单击“创建”选项卡下“查询”组中的“查询设计”按钮，在弹出的“显示表”对话框中双击添加表“tDoctor”、“tOffice”、“tPatient”和“tSubscl4be”，然后单击“关闭”按钮，关闭“显示表”对话框。
步骤2：双击tPatient表的“姓名”、“年龄”、“性别”字段，双击tSubscribe表的“预约日期”字段，双击tOffice表的“科室名称”和tDoctor表的“医生姓名”字段；在“姓名”字段的“条件”行中输入“Like\\
解析：
综合应用题
3.在考生文件夹下，存在一个数据库文件“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：选择
本文档预览：3600字符，共3826字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
