1、国家二级 VF机试（操作题）模拟试卷 90及答案与解析 一、基本操作题 1 在考试文件夹下完成下列操作： (1)在考生文件夹下 “人事管理 “数据库中，为 “职工 “表中的 “性别 “字段设置有效性规则，只能取 “男 “或 “女 “；默认值是 “男 “。 (2)建立快捷菜单 cd，选项有打开、关闭和退出。生成同名的菜单程序文件。 (3)为 “职工 “表加入一个普通索引，索引名和索引表达式均为 “部门编号 “，升序。 (4)为 “职工 “表和 “部门 “表建立联系，定义参照完整性规则：删除规则为 “级联 “，更新规则和插入规则为 “限制 “。 二、简单应 用题 2 在考生文件夹下完成下列操作：
2、(1)编写程序文件 prgone.prg，其功能是从 “人事管理 “数据库的相关表中查询销售部从 1985年到 1989年这 5年出生的所有职工的信息，并存到表 cyqk.dbf中。查询结果包含编号、姓名、出生日期和部门名称（部门表中的名称） 4个字段；按职工的出生日期和编号升序排列。最后运行该程序。 (2)扩展基类 ListBox，创建一个名为 MyListBox的新类。新类保存在名为Myclasslib的类库中，该类库文件存放在考生文件夹下。设置新类的 Height属性的默认值为 120， Width属性的默认值为 80。 三、综合应用题 3 为了对 “认识管理 “数据库中的数据进行查询，
3、请设计一个用于查询部门职工的表单。该表单的名称为 formone,文件名为 pform.scx，标题为 “人员查询 “，其界面如下图所示： 表单左侧有一个名为 Labelone的标签，显示内容未 “输入部门 “；一个名为 Textone的文本框，用于输入部门名称；两个名为 Commanda和 Commandb的命令按钮，分别显示 “查询 “和“退出 “。表单右侧是一个名为 Gridone的表格。单击 “查询 “按钮，查询指定部门所有职 工的信息，包括职工的姓名、性别、出生日期和编号，按编号升序排序。查询结果不仅显示在表单右侧的表格中，也保存在表文件 tableone.dbf中。单击 “退出 “
4、按钮，关闭并释放表单。最后运行表单，在文本框中输入部门名称 “开发部 “，单击“查询 “按钮，显示并保存相应的查询结果。 国家二级 VF机试（操作题）模拟试卷 90答案与解析 一、基本操作题 1 【正确答案】 【操作步骤】 (1)单击菜单栏 “文件 “-“打开 “命令，打开考生文件夹下名为 “人事管理 “的数据库。右键单击 “职工 “表，选择 “修改 “命令，在打开的表设计器 中，将鼠标放在 “性别 “一行，在 “字段有效性 “下的 “规则 “一栏输入 “性别 =“男 “.OR.性别 =“女 “，在 “默认值 “处输入 “男 “。 (2)通过 “新建对话框 “新建一个菜单，并在弹出的对话框中选
5、择 “快捷菜单 “。分别输入三个菜单名称 “打开 “、 “关闭 “和 “退出 “，保存菜单并命名为 “cd“。然后单击菜单栏 “菜单 “-“生成 “命令，生成可执行文件。 (3)在 “数据库设计器 -人事管理 “中，右键单击 “职工 “表，选择 “修改 “命令，在打开的表设计器中，单击 “索引 “选项卡，输入索引名 “部门编号 “，类型设为 “普通索引 “，表达式为 “部门编号 “，单击 “确定 “按钮保存对表的修改。 (4)在 “数据库设计器 -人事管理 “中，将 “部门 “表的主索引 “部门编号 “用鼠标拖拽到 “职工 “表的普通索引 “部门编号 “处，松开鼠标即可建立两表间联系。选择菜单
6、栏 “数据库 “-“清理数据库 “命令，然后右键单击两表间的联系线，选择 “编辑参照完整性“，在 “编辑参照完整性生成器 “对话框中，依次选中 “更新规则 “选项卡下的 “限制 “单选按钮、 “删除规则 “选项卡下的 “级联 “单选按钮、 “插入规则 “选项卡下的 “限制 “单选按钮，最后单击 “确定 “按钮。 二、简单应用题 2 【正确答案】 【操作步骤】 (1)单击常用工具栏的 “新建 “按钮，新建一个程序文件，编写命令语句如下： SELECT 职工 .编号 ,职工 .姓名 as 姓名 , 职工 .出生日期 , 部门 .名称 as 部门名称 ; FROM 人事管理 !部门 INNER JO
7、IN 人事管理 !职工 ; ON 部门 .部门编号 = 职工 .部门编号 ; WHERE year(职工 .出生日期 ) = 1985; AND year(职工 .出生日期 ) = 1989; AND 部门 .名称 = “销售部 “; GROUP BY 职工 .编号 ; ORDER BY 职工 .出生日期 , 职工 .编号 ; INTO TABLE cyqk.dbf 保存程序文件为 “prgong.prg“并运行。 (2)步骤 1：通过 “新建 “对话框新建一个 “类 “文件。 步骤 2：在弹出的 “新建类 “对话框中，输入 “类名 “MyListBox，在 “派生于 “下拉列表中选择 Lis
8、tBox，单击 “存储于 “文本框后的按钮，在打开的 “另存为 “对话框选择考生文件夹，输入文件名 myclasslib，单击 “确定 “按钮。 步骤 3：打开 “类设计器 “窗口，进入类设计器环境。将其 Height属性 设为 “120“，Width属性设为 “80“。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：通过 “新建 “对话框新建一个表单。在打开的表单设计器中，修改表单的Caption属性为 “人员查询 “， Name属性为 “formone“。 步骤 2：根据题目要求向表单添加一个标签 label1，并将其 Caption属性修改为 “输入部门 “， name属性修
9、改为 “Labelone“。添加一个文本框控件，修改其 name属性为“Textone“。添加两个命令按钮，分别将两个命令按钮的 Caption属性修改为 “查询 “和 “退出 “。 Name属性分别修改为 “Commanda“和 “Commandb“。 步骤 3：在表单设计器中，右键单击表单空白处，选择 “数据环境 “命令，将 “部门 “表和 “职工 “表添加到数据环境中。向表单添加一个表格 Grid1，将其 Name属性修改为 “Gridone“， RecordSource属性设为 “SELECT 姓名 ,性别 ,出生日期 ,编号 from 职工 “， RecordSourceType属性
10、设为 “4-SQL说明 “。 步骤 4：双击 “查询 “命令按钮，编写其 Click事件代码如下： x=allt(thisform.textone.value) thisform.Gridone.recordsourcetype=4 thisform.Gridone.recordsource=“SELECT 职工 .姓名 ,职工 .性别 ,职工 .出生日期 ,职工 .编号 ; FROM 人事管理 !部门 INNER JOIN 人事管理 !职工 ; ON 职工 .部门编号 =部门 .部门编号 ; WHERE 部门 .名称 =x; ORDER BY 职工 .编号 ; INTO table tableone.dbf“ 步骤 5：双击 “退出 “命令按钮，编写其 Click事件代码 “ThisForm.Release“。 步骤 6：保存表单为 “pform“并运行，在文本框中输入部门名称 “开发部 “，单击 “查询 “按钮。
