1、TO FILE（2）步骤1：打开考生文件夹下的项目信息表，通过一对多报表向导创建一个报表。步骤2：选择表并添加相应的字段到选定字段中。步骤3：按题目要求选择排序并设置报表样式。步骤4：在步骤6完成中输入报表标题。步骤5：输入报表文件名report。【解题思路】要将查询文件设置为表格控件的数据源，首先需设置表格控件的RecordSourceType属性设置为3查询（.QPR），然后将表格控件的RecordSource属性设计为查询文件名。调整表单中各控件的对齐方式须在【格式】|【对齐】菜单下进行操作。本题还用到了命令按钮和表格控件的Width属性，该属性用于设置控件的宽度。单击常用工具栏中的新建
2、按钮，新建一个查询，依次将题目所要求的表添加到查询设计器中。分别选中字段项目信息项目号、项目信息项目名零件信息零件名称和使用零件数量并添加到可用字段。排序依据选项卡中为查询设置排序。在系统菜单中单击保存按钮保存查询，输入查询名chaxun最后单击常用工具栏中的运行按钮运行查询。在命令窗口输入CREATE FORM myform新建表单。并修改表单的Name属性为myform。从表单控件工具栏向表单中添加一个表格控件和一个命令按钮控件，修改表单控件的属性。设置命令按钮与表格等宽且左对齐。双击退出按钮，写入Click事件代码。*按钮Click事件代码*ThisForm.Release第2套 【解题
3、思路】在Visual FoxPro中，要建立参照完整性，必须首先建立表之间的联系（在数据库设计器中进行），然后执行数据库菜单下的清理数据库命令，最后用鼠标右击表之间的联并从弹出的快捷菜单中选择编辑参照完整性，在弹出的参照完整性生成器对话框中即可完成相应的设置。（1）在命令窗口输入命令：Create Data 订单管理，打开数据库设计器，将自由表employeeorderscustomer添加到数据库中。（2）在数据库设计器中为表orders建立普通索引，索引名为nf，索引表达式为year（签订日期）（3）按照上述操作步骤分别为表employee和orders建立主索引和普通索引，在数据库设计器
4、中从主索引拖到普通索引建立表的联系。（4）打开参照完整性编辑器，按题目的要求设置规则。【解题思路】通过常用工具栏中的打开按钮打开表单，右击表单空白处可以为表单添加数据环境。通过查询设计器完成查询的创建。表单的MultiSelect属性用于指定列表框能否多重选定；Rowsorcetype属性用来指定表格和列表框的数据类型，Rowsorce属性用来指定表格和列表框的数据源。打开表单formone，在表单的空白处单击右键，将Orders表添加到表单的数据环境中。修改列表框和表格的属性。显示按钮，修改其Click事件代码如下。*程序提供的*下面代码的功能是根据用户对列表框的选择结果构建字段列表，然后进
5、一步构建select语句并据此为表格的相关属性设值。*修改所有* FOUND *下面的一条语句。*不能修改其他语句。不能增加语句，也不能删除语句。s=f=.T.* FOUND *FOR i=1 TO thisform.List1.ColumnCount IF thisform.List1.Selected（i） IF f s=thisform.List1.value f=.F. ELSE s=s+thisform.List1.value ENDIFENDFORst=select &s from orders into cursor tmpthisform.Grid1.RecordSource=
6、st*错误1：修改为：FOR i=1 TO thisform.List1.ListCount错误2：s=thisform.List1.values=thisform.List1.List（i）错误3：s=s+thisform.List1.values=s+thisform.List1.List（i）保存并运行表单查看结果。按钮，新建查询，将表添加到查询中。分别选择字段orders.订单号、orders.签订日期、orders.金额、Employee.姓名 AS 签订者、customer.客户名，添加到可用字段中。在筛选选项卡中设置筛选条件为orders.签订日期=2001-05-01在排序选项
7、卡中指定排序选项为降序，添加字段orders.签订日期，orders.金额。选择系统菜单中的查询查询去向表，输入表名为tableone步骤6：保存查询，输入查询名queryone，在常用工具栏中单击运行按钮，运行该查询。【解题思路】建立表单，修改其ShowWindow属性为2，使其作为顶层表单。建立菜单，在菜单设计器中完成菜单项的建立，在常规选项对话框中将菜单设计为顶层表单，在提示选项对话框中为菜单项设置访问键。在命令窗口输入 Create form myform将表单的ShowWindow属性设置为2-作为顶层表单双击表单空白处，编写表单的Init事件代码： DO mymenu.mpr WI
8、TH THIS, myform新建菜单，输入菜单项统计（T）退出（R），并为统计菜单项设置访问键ALTT以同样的方式为ALTR，并执行命令，将此菜单设置为为菜单项创建过程，写入如下SQL语句。菜单中的命令语句*SELECT Customer.客户号, Customer.客户名, sum（orders.金额） as 合计;FROM customer,orders ;WHERE Customer.客户号 = Orders.客户号;GROUP BY Customer.客户号;ORDER BY 3 DESC;INTO TABLE tabletwo.dbf*Myform.Release*步骤7：保存菜单
9、名为mymenu，生成可执行程序。运行表单，查看结果。第3套【解题思路】在第2小题中，ALTER TABLE语句用于修改表的结构，其中ADD短语的功能是添加新的字段或索引，UNIQUE短语的功能是指建立候选索引（注意不是唯一索引），ADD UNIQUE连用表示新增一个候选索引，TAG短语用于指定索引名称。在第4小题中，由题意可知，DO.WHILE循环语句的格式为：DO WHILE ENDDO（1）在命令窗口输入： Crea Data 学校按下回车键执行语句，打开数据库设计器，将表教师表课程表学院表（2）新建一个程序，输入： ALTER TABLE 课程表 ADD UNIQUE 课程号 TAG
10、temp 保存程序名为one，最后运行程序。（3）通过表单向导新建一个表单，选定的全部字段作为选定字段，选择按课程号降序排序，完成向导并输入表单文件名myform。（4）打开程序test，将第二行语句改为： DO WHILE i=1保存并运行程序，查看运行结果。【解题思路】在第1小题中，对于SQL的查询语句，将查询结果保存到数组中应该使用INTO短语，而不是TO；打开表的命令是USESCAN循环语句表示条件的短语应该用FOR，而不是OF；由题意知，变量SUM用于统计满足条件的教师人数，故应使每找到一条满足条件的记录，SUM值自动加1在第2小题中，视图设计器的使用同查询设计器，考生可以参考前面讲
11、到的查询设计器来设计本题的视图。打开考生文件夹下的程序文件temp.prg，并按题目的要求进行改错，修改完成后运行程序文件，如下所示。&下句只有一处有错误SELECT 课程号 FROM 课程表 WHERE 课程名=数据结构 TO ARRAY a下句有错误OPEN 教师表STORE 0 TO sum下句两处有错误SCAN OF 课程号=a OR 工资=4000 sum+1ENDSCAN?sum*将 TO 改为 INTO。将 OPEN 改为 USE。将 SCAN OF 改为 SCAN FOR。错误4：将 OR 改为 AND。错误5：将 sum+1 改为 sum=sum+1。单击系统菜单中的命令，新
12、建一个视图，将表添加到新建的视图中。将教师表姓名教师表工资学院表系名添加到选定字段中。在筛选选项卡中选择字段，条件为，实例为4000在排序选项卡中，设置按工资降序排序，再按系名升序排序。保存视图名为teacher_v【解题思路】建立表单并添加控件，然后按要求修改各控件的属性；在表单的load事件中定义组合框的数据源，完成命令按钮的代码；当列表框要求为数组时，可以在表单的load事件中进行定义；为选项按钮组设置标题，需要右键单击选项按钮组控件，选择编辑在命令窗口输入： Create Form oneform并按回车键，新建一个名为oneform表单。在表单控件中以拖拽的方式向表单中添加两个标签、
13、一个选项组、一个组合框和两个命令按钮，并修改各控件的属性。双击表单空白处，编写表单的load事件代码：*表单的load事件代码*public a（3）a（1）=3000a（2）=a（3）=5000*双击命令按钮，分别编写按钮的Click事件代码。按钮的Click事件代码*x=val（bo1.value）if thisform.optiongroup1.value = 1 sele * from 教师表 where 工资 = x order by 工资 desc,姓名 into table salaryelse sele * from 教师表 where 工资 if int（x/2）=x/2 s
14、1=s1+1 else s2=s2+1 endif if div（x,3）=0 s3=s3+1 x=x-1enddothisform.text2.value=s1thisform.text3.value=s2thisform.text4.value=s3thisform.text5.value=s1+s2+s3改为 STORE 0 TO x,s1,s2,s3。改为 x=val（thisform.text1.value）。改为 if mod（x,3）=0。以同样的方法修改按钮的Click事件代码为Thisform.Release【解题思路】在表单设计器中完成命令按钮的Click事件代码的修改或编
15、写。确定命令按钮的Click事件如下。 *按钮的Click事件代码*SELECT Student.姓名, Course.课程名称, Score.考试成绩; FROM student INNER JOIN score; INNER JOIN course ; ON Score.课程编号 = Course.课程编号 ; ON Student.学号 = Score.学号; where &cn; ORDER BY Course.课程名称, Score.考试成绩 DESC; INTO TABLE zonghe.dbf保存并运行表单。第5套 【解题思路】从主索引拖拽到普通索引完成表间联系的建立，在表设计器
16、中可以完成添加字段、设置字段有效性等操作。（N,2,0）表示数据类型为数值型，宽度2，小数位数0。（1）打开数据库SCORE_MANAGER，在父表中选中主索引，按住鼠标左键拖动至子表相应的普通索引上，释放鼠标。（2）打开表COURSE，在系统菜单中执行命令，在最下面输入字段名开课学期，数据类型为数值型（2,0）。（3）在数据库设计器中双击SCORE1表的任意位置打开该表，单击命令，在弹出的表设计器中选中成绩字段，在字段有效性中的规则文本框中填入：成绩=0，在信息文本框中填入成绩必须大于或等于零（4）同上题打开表设计器，选择字段，单击NULL列下的按钮（表示此列允许空值），然后再在中的默认值中
17、填入.NULL.【解题思路】在第1小题中，可以在命令窗口中完成SQL语句的编写，然后通过报表向导完成报表的建立。在第2小题中，Visual FoxPro支持两种类型的菜单：条形菜单和弹出式菜单，其中的条形菜单在新建的过程中需在新建菜单对话框中选择按钮，弹出式菜单在新建的过程中需在快捷菜单按钮。在命令窗口中输入如下语句，并执行。SELECT 姓名,2003-Year（出生日期） as 年龄;FROM student;INTO TABLE new_table1.dbf通过工具栏中的按钮新建报表。选择表new_table1的全部字段作为选定字段。单击下一步到步骤5，选择按字段年龄单击下一步，输入报表
18、标题姓名年龄完成报表，输入报表名为new_report1新建菜单，分别输入查询两个菜单项。的结果中选择命令，并在后面的框中输入： SET SYSMENU TO DEFAULT保存菜单为query_menu并生成可执行菜单。【解题思路】建立表单并按题目的要求添加控件，然后修改各控件的属性和方法。本题还要注意MESSAGEBOX （）函数的使用，其格式为MESSAGEBOX （提示信息，对话框的属型，对话框窗口标题），其中的提示信息为对话框中所用到的提示文字，后面两项为可选项。打开考生文件夹下的数据库SCORE_MANAGER CREATE FORM myform1新建一个表单。按题目的要求添加控
19、件，并修改控件的属性。添加数据环境表 score1编写命令按钮的Click事件代码。按钮的Click事件代码*SELECT course.课程名,score1.成绩; FROM course,score1; WHERE course.课程号=score1.课程号 AND score1.学号= ThisForm.Text1.text; INTO TABLE coruse_cursor IF RECC（） = 0 MESSAGEBOX（学号不存在，请重新输入学号） ThisForm.Grid1.RecordSource=coruse_cursor ThisForm.Grid1.refresh第6套【考点分析】本大题主要考查的知
