1、国家二级 VF机试（操作题）模拟试卷 91及答案与解析 一、基本操作题 1 (1)使用报表向导为 “职工 “表创建一个报表 one，选择 “职工 “表的所有字段，报表样式选择简报式，按 “职工号 “为升序排列，其他选项取默认值。 (2)建立一个如下图所示的菜单 mymenu，注意要生成菜单。 (3)新建数据库文件 mydata，并将 “教师 “表加入其中。 (4)使用 SQL Create命令建立 “学生 “表， “学生 “表中包括学号 (C 10)、姓名 (C 16)和年龄 (I)字段 ,学号为主关键字。命令存储于文件 mypro.prg中 。 二、简单应用题 2 在考生文件夹下完成下列操作
2、： (1)请修改并执行 test。 test.prg的功能是：根据 “职工 “和 “部门 “两个表，计算每个部门 1980到 1990年出生的职工人数，存储于新表 new中，新表中包括 “部门 “和 “人数 “两个字段，结果按 “人数 “递减排序。注意，每一行有且仅有一处错误，不能修改其他语句。 (2)创建一个新类Mycommandbutton，该类扩展 VFP的 CommandButton基类，新类保存在考生文件夹下的 myclasslib类库中。在新类中将标题属性设置为 “打开 “。新建一个 表单myform，在表单中添加新类 Mycommandbutton，如图所示。 三、综合应用题 3
3、 (1) 新建一个名为 “职工管理 “的数据库文件，将自由表 “部门 “、 “职工 “添加到该数据库中。 (2) 将 “部门 “中的 “部门号 “定义为主索引，索引名是 index_depa。 (3)建立一个查询 mysql，查询 “通信 “学院工资大于 3000的人员 “姓名 “和 “职工 “信息存入salary.dbf中，按工资升序排列，执行该查询。 (4)建立包括一个表情 (Label1)、一个列表框 (List1)、一个表格 (Grid1)， Label1的标题为 “部门名 “的表单 formtwo。 (5)列表框 (List1)的 RowSource和RowSourceType属性手
4、工指定为 “部门 .部门名 “和 6。 (6)表格 (Grid1)的 RecordSource和 RecordSourceType属性手工指定为 “select 职工号，姓名，工资 from 职工 “和 4。(7)列表框 (List1)的 DblClick事件编写程序。程序的功能是 :表单运行时，用户双击列表框中实例时，将该部门的 “职工号 “、 “姓名 “和 “工资 “三个字段的信息存入自由表 three.dbf中， 表中的记录按 “职工号 “降序排列。 (8)运行表单，在列表框中双击 “信息管理 “。 国家二级 VF机试（操作题）模拟试卷 91答案与解析 一、基本操作题 1 【正确答案】
5、【操作步骤】 (1)步骤 1：单击常用工具栏的 “新建 “按钮，使用 “报表向导 “新建一个报表。 步骤 2：在步骤 1-字段选取中，在 “数据库和表 “列表框中，选择表 “职工 “，接着在 “可用字段 “列表框中显示表职工的所有字段名，将所有字段添加至 “选定字段 “列表框中，单击 “下一步 “按钮。 步骤 3：在步骤 2分组记录中，直接单击 “下一步 “按钮。 步骤 4：在步骤 3选择报表样式中，选择 “简报式 “，单击 “下一步 “按钮。 步骤 5：在步骤 4定义报表布局中，直接单击 “下一步 “按钮。 步骤 6：在步骤 5-排序记录中，设置按 “职工号 “升序排列，单击 “下一步 “按
6、钮。 步骤 7：在步骤 6-完成中，默认报表标题 “职工 “，单击 “完成 “按钮。 步骤 6：在 “另存为 “对话框中，输入报表名 “one“，再单击 “保存 “按钮。 (2)通过 “新建 “对话框新建一个菜单，分别输入三个菜单名称 “打开文件 “、 “关闭文件 “和 “退出 (=1980 and year(出生日期 )“，实例输入 “3000“。在 “排序依据 “选项卡下，设置按工资升序排列。选择菜单栏 “查询 “-“查询去向 “命令，设置查询去向为 “表 “，输入文件名 “salary“。然后保存查询为mysql并运行。 (4)通过 “新建 “对话框新建一个表单文件，根据题目要求向表单添
7、加一个标签控件，一个列表框控件以及一个表格控件。保存表单为 “formtwo“。 (5)将标签 label1的 Caption属性 改为 “部门名 “，列表框 list1的 RowSource属性为 “部门 .部门名 “，其 RowSourceType属性设为 “6“。 (6)右键单击表单空白处，选择 “数据环境 “，将 “部门 “和 “职工 “表添加到数据环境中。将表格 Grid1的 RecordSource属性改为 “select 职工号 ,姓名 ,工资 from 职工 “，其 RecordSourceType属性改为 “4“。 (7)双击列表框，编写其 Dbclick事件代码如下： xm=thisform.List1.Value thisform.grid1.RecordSource=“select 职工号 ,姓名 ,工资 from 职工 ,部门 where 职工 .部门号 =部门 .部门号 and 部门 .部门名 =xm into dbf three order by 职工号 desc“ (8)保存表单并运行，在列表框中双击 “信息管理 “，查看结果。
