计算机二级vf无忧题库第90道.ppt

一、基本操作题（共四小题，第1和2题是7分、第3和4是8分） 1在考生文件夹下“人事管理“数据库中，为“职工“表中的“ 性别“字段设置有效性规则，只能取“男“或“女“；默认值是“ 男“。 2建立快捷菜单cd，选项有打开、关闭和退出。生成同名 的菜单程序文件。 3为“职工“表加入一个普通索引，索引名和索引表达式均 为“部门编号“，升序。 4为“职工“表和“部门“表建立联系，定义参照完整性规则 ：删除规则为“级联“，更新规则和插入规则为“限制“。 本题的主要考核点：字段有效性规则的建立、字段默认值的设置 、快捷菜单的建立、普通索引的建立、建立两个表之间的联系 、设置参照完整性约束。 1、利用“文件“菜单下的“打开“命令打开数据库“人事管理“。再 打开“职工“表的表设计器，选择“性别“字段，在其字段有效性 规则栏中输入：性别$“男女“，在默认值栏中输入：“男“。 2、在“文件“菜单中选择“新建“，在“新建“对话框中选择“菜单“ ，单击“新建文件“按钮，选择“快捷菜单“，在菜单设计器中输 入三个菜单项“打开“、“关闭“和“退出“，单击“菜单“菜单中的“ 生成“，按提示保存为cd，并生成菜单源程序文件（MPR）。 3、打开“职工“表的表设计器，打开“索引“选项卡，在索引名处 输入：部门编号，类型选择“普通索引“，表达式为：部门编号 ，排序为“升序“。 4、在数据库设计器中，选中“部门“表中的索引“部门编号“并拖 动到“职工“表的“部门编号“的索引上并松开，这样两个表之间 就建立起了永久联系。建立好永久联系之后，在两处表的“部门 编号“索引之间有一条线，单击这条表示两个表之间联系的线， 线会加粗，此时在主菜单中选择“数菘?中的“编辑参照完整性 (I)“，系统弹出“参照完整性生成器“对话框，在“更新规则“标签 中，选择“限制“规则，在“删除规则“中选择“级联“，在“插入规 则“中选择“限制“，单击“确定“保存所编辑的参照完整性。 二、简单应用（2小题，每题20分，计40分） 1编写程序文件prgone.prg，其功能是从“人事管理“数据 库的相关表中查询销售部从1985年到1989年这5年出生的所 有职工的信息，并存到表cyqk.dbf中。查询结果包含编号 、姓名、出生日期和部门名称（部门表中的名称）4个字段 ；按职工的出生日期和编号升序排序。最后运行该程序。 2扩展基类ListBox，创建一个名为MyListBox的新类。 新类保存在名为Myclasslib的类库中，该类库文件存放在 考生文件夹下。设置新类的Height属性的默认值为120， Width属性的默认值为80。 本题的主要考核点：利用SQL_SELECT语句建立查询程序、 新建自定义表单类。 解题思路： 第1题：在Visual FoxPro主窗口中按下组合键Ctrl+N，系 统弹出“新建“对话框，在文件类型中选择“程序“，点击“新 建文件“按钮，在弹出的代码编辑器窗口中输入以下代码： SELECT 编号,姓名,出生日期,名称 AS 部门名称 FROM 部 门,职工 ; WHERE 部门.部门编号=职工.部门编号 AND 部门.名称=“ 销售部“ ; AND YEAR(职工.出生日期)=1985 AND YEAR(职工.出生 日期)=1989 ; ORDER BY 出生日期,编号 INTO TABLE cyqk.dbf 最后保存并运行该程序。 第2题：建立类可以使用“文件“菜单完成，选择文件-新建- 类-新建文件，在弹出的“新建类“对话框中：在“类名“右边 的文本框中输入：MyListBox，在“派生于“右边的列表框中 选择ListBox，在“存储于“右边的浏览中选择考生文件夹， 再输入文件名Myclasslib，单击“保存“按钮，然后单击“确 定“按钮，打开“类设计器“窗口，进入类设计器环境，在属 性窗口中，将新类的Height属性设置为120，Width属性设 置为80。 三、综合应用（1小题，计30分） 为了对“人事管理“数据库中的数据进行查询，请设计一个 用于查询部门职工的表单。该表单的名称为formone，文 件名为pform.scx，标题为“人员查询“，其界面如下图所 示： 表单左侧有一个名为Labelone的标签，显示内容为“输入部门 “；一个名为Textone的文本框，用于输入部门名称；两个 名为Commanda和Commandb的命令按钮，分别显示“查 询“和“退出“。表单右侧是一个名为Gridone的表格。 单击“查询“按钮，查询指定部门所有职工的信息，包括职 工的姓名、性别、出生日期和编号，按编号升序排序。查 询结果不仅显示在表单右侧的表格中，也保存在表文件 tableone.dbf中。 单击“退出“按钮，关闭并释放表单。 最后运行表单，在文本框中输入部门名称“开发部“，单击“ 查询“按钮，显示并保存相应的查询结果。 本题的主要考核点：表单文件的创建、控件的属性的修改、 SQL语句运用、表单的退出。 解题思路： 在命令窗口输入命令：CREATE FORM pform，打开 表单设计器窗口。 在表单上添加标签、文本框、命令按钮、表格，并进行 适当的布置和大小调整。 根据题面要求设置标签、文本框、命令按钮、表格以及 表单的属性值。 将表格Gridone的RecordSourceType属性值设置为“4- SQL说明“。 设置“查询“按钮的Click事件代码： st=“SELECT 姓名,性别,出生日期,编号 FROM 职工,部门 WHERE 职工.部门编号=部门.部门编号 AND ; 部门.名称=thisform.Textone.Text INTO TABLE tableone.dbf ORDER BY 职工.编号“ thisfor