二级vf上机题库

二级vf上机题库 一、 1.新建一个名为"学校"的数据库文件，将自 1、打开数据库文件"大学管理"，打开"课程表"接在命令窗口中输入:create form form1，单击右由表"教师表"、"课程表"和"学院表"添加到该数据表的表设计器，打开"索引"选项卡，在索引名处输入:键添加数据环境，选中employee表文件添加到数据环库。2.使用SQL语句ALTER TABLE...UNIQUE...将"课课程号，类型选择"主索引"，表达式为:课程号;再境中。2、点击工具栏按钮"表单控件工具栏"，在弹程表"中的"课程号"定义为候选索引，索引名是temp， 打开"教师表"表的表设计器，打开"索引"选项卡，在出的"表单控件"对话框中，选中"表格"控件，在表单 1、建立数据库的常用方法有三种:在项目管理索引名处输入:课程号，类型选择"普通索引"，表达设计器中拖动鼠标，这样在表单上得到一个"表格"控器中建立数据库;通过"新建"对话框建立数据库; 使式为:课程号。 2、打开one.prg程序，将第2条语句件grid1，按题面要求将grid1的RecordSourceType属用命令交互建立数据库，命令为:CREATE DATABASE 修改为:DO WHILE i>=1。 性值设置为"1-别名"、RecordSource设置为[DatabaseName|?] 3、通过"文件"菜单下的"新建"命令打开报表设employee。用类似的方法为表单再加入1个"命令按钮 2、将自由表添加到数据库中，可以在项目管理计器，利用"报表"菜单下的"快速报表"命令创建快速"控件command1，Caption属性值设置为"退出"，器或数据库设计器中完成。打开数据库设计器，在"报表two。 command1(退出)的Click事件代码为:数据库"菜单中或在数据库设计器上单击右键，在弹 4.使用SQL语句设置表字段有效性规则的命令thisform.release。 出的菜单中选择"添加表"，然后在"打开"对话框中选是:alter table 教师表 alter 职工号 set check 3、打开two.prg程序，将第2行语句修改为:from 择要添加到当前数据库中的自由表。 LEFT(职工号,4)="1102"，然后将此命令保存在employee p join employee c;。第3行语句修改为: 3、在命令窗口输入SQL命令:ALTER TABLE 课程three.prg文件中。 on p.组别=c.组别 where c.职务="组长" and c.姓表 ADD UNIQUE 课程号 tag temp，并将该语句保存二、1.打开数据库文件"大学管理"，修改并执行程序名<>p.姓名;。 到one.prg文件中。 four.prg。程序four.prg的功能应该是:?建立一个三、1.建立如下图所示的表单文件form_three(表单 4、选择文件--新建--表单--向导--表单向导，"工资表"(各字段类型和宽度与"教师表"的对应字段名为form1)。标签控件命名为Ln，文本框控件命名选择"课程表"中的所有字段，点"下一步"，再点"下相同)，其中职工号为关键字;?插入一条"职工号"、为Textn，命令按钮控件命名为Commands。表单运行一步"，排序次序中选择"课程号"为"降序"，保存表"姓名"和"工资"分别为"11020034"、"宣喧"和4500的时在文本框中输入职员号，单击"开始查询"命令按钮单为myform。 记录 混凝土 养护记录下载土方回填监理旁站记录免费下载集备记录下载集备记录下载集备记录下载 ;?将"教师表"中所有记录的相应字段插入"工查询该职员所经手的订购单信息(order表)，查询5、打开test.prg程序，将第2条语句修改为:DO 资表";?将工资低于3000的职工工资增加10%;?删的信息包括:订单号、客户号、签订日期和金额，按除姓名为"Thomas"的记录。 签订日期升序排序，并将结果存储到用字母't ?WHILE i>=1。 二 1.请修改并执行程序temp。temp.prg的功能是: 1、第一处错误应改为:CREATE TABLE 工资在命令窗口输入命令:CREATE FORM form，打开表单"课程表"计算讲授"数据结构"这门表(职工号 C(8) PRIMARY KEY,姓名 C(6),工资 设计器窗口。 根据"教师表"和课程、并且"工资"大于等于4000的教师人数。 1、N(10,2));第二处错误应改为:INSERT INTO 工资表 ?在表单上添加标签、文本框和命令按钮，并进VALUES ("11020034","宣喧",4500);第三处错误应行适当的布置和大小调整。 本题是一个程序修改题。第一处错误应改为:SELECT 课程号 FROM 课程表 WHERE 课程名="数据结构" 改为:UPDATE 工资表 SET 工资=工资*1.1 WHERE 工 ?根据题面要求设置标签、文本框和命令按钮的<3000;第四处错误应改为:DELETE FROM 工资表 属性值。 INTO ARRAY a;第二处错误应改为:USE 教师表;第资三处错误应改为:SCAN FOR 课程号=a AND 工WHERE 姓名="Thomas"。 ?设置"查询"按钮的Click事件代码: 资>=4000;第四处错误应改为:sum=sum+1。 2、可以在新建对话框中、项目管理器中、或用CREAT x='t'+alltrim(thisform.Textn.value) 2、在新建对话框中、项目管理器中、或用CREAT QUERY命令打开查询设计器，利用查询设计器创建查 SELECT Order.订单号,Order.客户号,Order.签VIEW命令打开视图设计器，建立一个视图，将"教师询，添加"教师表"和"学院表"，选中题面要求的字段，订日期,Order.金额; 表"和"学院表"添加到视图中，并将题中指定字段添在"筛选"中添加:教师表.工资<=3000，先按"工资" FROM employee INNER JOIN order ; 加入视图;切换到"筛选"中选择字段"教师表.工资"，降序排列、再按"姓名"升序排列，查询去向为表five， ON Employee.职员号=Order.职员号; 条件为">="，实例为"4000";切换到"排序依据"中选最后将查询保存在teacher_q文件中并运行。 where Order.职员号择字段"教师表.工资"，在"排序选项"处选择"降序"，三:1.建立表单，文件名和表单名均为myform。 =alltrim(thisform.Textn.value); 再选择字段"教师表.系名"，在"排序选项"处选择"升2.建立一个如图所示的快捷菜单mymenu，该快捷 ORDER BY Order.签订日期; 序";最后将视图命名为teacher_v。 菜单有两个选项:"取前3名"和"取前5名"。 INTO TABLE &x 三、:1.建立一个文件名和表单名均为oneform的表 第一步:首先建立表单，再建立快捷菜单， thisform.release 单，表单中包括两个标签(Label1和Label2)、一个并生成相应的mpr文件，然后在表单中调用快捷菜单。 ?建立菜单可以使用"文件"菜单，选择文件--新选项组(Optiongroup1)、一个组合框(Combo1)和 具体方法是:在"文件"菜单中选择"新建"，在"新建"建--菜单--新建文件打开菜单设计器。在菜单设计器?在命令窗口输入命令:CREATE FORM form，打开表对话框中选择"表单"中建立各菜单项，菜单名称分别为:"查询"和，单击"新建文件"按钮，将name"退出"。单设计器窗口。 属性改为"myform"， 再在"文件"菜单中选择"新建"，"查询"菜单的结果列中选择"命令"，选项列中输入do ?为表单添加数据库环境，在"显示在form form_three，"菜单下打开"新建"对话框中选择"菜单"，单击"新建文件"按"退出"菜单项的结果列中选择"命"数据环境"或在表单上点击右键打开"数据环境"。 钮，选择"快捷菜单"，在菜单设计器中输入两个菜单令"，选项列中输入SET SYSMENU TO DEFAULT。 ?在表单上添加各标签、选项组、组合框和命令 ?最后保存菜单mymenu.mnx，并生成菜单程序项"取前3名"和"取前5名"，结果均为"过程"，"取前3按钮，并进行适当的布置和大小调整。 名"过程的代码为:SELECT TOP 3 学院表.系mymenu.mpr，从菜单运行所建立的表单，并依次查询 ?根据题面要求设置标签、选项组、组合框和命名职员107、111和,avg(教师表.工资) as 平均工资 FROM 大学管理!115经手的订购单信息。 令按钮以及表单的属性值。 学院表 INNER JOIN 大学管理!教师表 ON 学院表.系 ?将组合框的RowSourceType属性值设置为"5-号=教师表.系号 GROUP BY 学院表.系名 ORDER BY 2 一、 在考生文件夹下有一表单文件myform.scx，数组"，RowSource属性值设置为"a"。 DESC into table sa_three，"取前5名"过程的代码其中包含"高度"标签、Text1文本框，以及"确定"命 ?设置"表单"控件的Load事件代码: 为:SELECT TOP 5 学院表.系名,avg(教师表.工资) as 令按钮。打开该表单文件，然后在表单设计器环境下 public a(3),i 平均工资 FROM 大学管理!学院表 INNER JOIN 大学完成如下操作:1(将标签、文本框和命令按钮三个 a(1) = 3000 管理!教师表 ON 学院表.系号=教师表.系号 GROUP 控件设置为顶边对齐。 2(设置"确定"按钮的属性使 a(2) = 4000 BY 学院表.系名 ORDER BY 2 DESC into table 在表单运行时按Enter键就可以直接选择该按钮。 a(3) = 5000 sa_five，单击"菜单"菜单中的"生成"，按提示保存3(将表单的标题设置为"表单操作";将表单的名称 ?设置"生成"按钮的Click事件代码: 为mymenu，并生成菜单源程序文件(MPR)。打开表设置为myform。4(设置"确定"按钮的Click事件代码， if thisform.optiongroup1.option1.value=1 单myform。双击表单设计器，打开代码窗口，在对象使得表单运行时，单击该按钮可以将表单的高度设置 for i=1 to 3 中选择myform，在过程中选择RightClick，输入代码:成在文本框中指定的值。 if thisform.combo1.listindex=i do mymenu.mpr，保存表单为myform。 1、打开表单myform，选中标签、文本框和命令then 第二步:运行表单，调出快捷菜单，分别执行"按钮，选择"格式"菜单下"对齐"菜单下的"顶边对齐 select * from 教师表 order by 取前3名"和"取前5名"两个选项。 "。2、将"确定"按钮的Default属性值设置为.T.。 工资 desc,姓名 into table salary where 教师表.一、 1.建立一个新表emp_bak.dbf，该表的结构与 3、将表单的Caption属性值设置为表单操作，工资>=a(i) employee表的结构完全相同。2.为employee表的"职Name属性值设置为myform。 endif 员号"字段建立一个候选索引，索引名为empid，索引 4、设置"确定"按钮的Click事件代码: next 表达式为"职员号"。 3.使用报表向导生成一个报表 this.parent.height=val(this.parent.text1.valu else 1、用命令复制表结构的命令是: e)。 for i=1 to 3 use employee 二、1(用SQL语句完成下列操作:检索客户名为 if thisform.combo1.listindex=i copy structure to emp_bak "lilan"所定商品的商品名和单价，结果按单价降序 then 2.在employee表设计器中的索引选项卡建立索第1题:本题的考查点是利用SQL_SELECT语句建立查 select * from 教师表 order by 引名为empid，索引表达式为"职员号"的候选索引。 询。其命令如下: 工资 desc,姓名 into table salary where 教师表. 3.启动报表向导可在"文件"菜单中选择"新建" SELECT Goods.商品名,Goods.单价 FROM 工资4500 order by 职工号 to file one.txt，然后 USE Order 成相应操作。 将此命令保存在two.prg文件中。 GO TOP 第1题: 4、打开"新建"对话框，在"文件类型"选项卡中 DO WHILE NOT EOF() "，单击"向导"按钮，再选择"报表向导"， ?在命令窗口输入命令:CREATE FORM formone，选择"报表 SELECT sum(Orderitem.数量*Goods.单价) 打开表单设计器窗口。 单击"确定"按钮，打开"报表向导"设计器，然后按照FROM orderitem,goods; ?在表单上添加标签、文本框和命令按钮，并进"报表向导"的提示逐步创建报表three即可。 WHERE Orderitem.商品号=Goods.商品号 行适当的布置和大小调整。 二、 1(请修改并执行程序four.prg，该程序的功能"教师表"计算"信息管理"系教师 AND orderitem.订单号=Order.订单号; ?设置标签、"查询"命令按钮、表单的Caption是:根据"学院表"和 GROUP BY Orderitem.订单号 INTO ARRAY A 属性值。 第1题:本题是一个程序修改题。第一处错误应 FROM 学院表 WHERE 系名="信息 REPLACE 总金额 WITH A[1] ?将文本框的Value属性值设置为"=date()"。 改为:SELECT 系号 SKIP ?设置"查询"按钮的Click事件代码: 管理" INTO ARRAY a;第二处错误应改为:USE 教师 ENDDO SELECT 姓名,性别,出生日期 FROM customers; 表;第三处错误应改为:SCAN FOR 系号=a;第四处添加的程序为:num=num+1。 在菜单名称中填入"返回"，结果为过程，在过程 WHERE 出生日 中输入此命令:SET SYSMENU TO DEFAULT。 期>=ctod(thisform.Text1.Text); 第2题:在新建对话框中、项目管理器中、或用、最后保存菜单mymenu.mnx，并生成菜单程序 ORDER BY 出生日期 DESC; CREAT VIEW命令打开视图设计器，建立一个视图，将 3mymenu.mpr，且运行菜单程序并依次执行"计算"和" INTO TABLE tableone.dbf "课程表"、"学院表"和"教师表"添加到视图中，并将返回"菜单命令。 ?保存表单并运行，在文本框中输入题中指定字段添加到视图中;切换到"筛选"中选择字 01/01/1980，并单击"查询"命令按钮。 段"课程表.学时"，条件为">="，实例为"60";切换一、 在考生文件夹下有一表单文件formone.scx， 第2题:打开"订单管理"数据库，单击"数据库"到"排序依据"中选择字段"学院表.系名"，在"排序选其中包含一个文本框和一个命令按钮。打开该表单文菜单中的"添加表"，将orderitems表添加到数据库项"处选择"升序"，再选择字段"教师表.姓名"，在"件，然后在表单设计器环境下完成如下操作: 1(将中，新建"本地视图"，添加"orderitems"表到视图中，排序选项"处选择"降序";最后将视图命名为表单的标题设置为"表单操作";命令按钮的标题设置 先选择"商品号"字段，再在"函数与表达式"中输入course_v。利用刚创建的视图course_v查询视图中的 2、将文本框的Value属性值设置为0，Width属性"SUM(Orderitems.数量) AS 订购总量"，单击"添加"全部信息，在"添加表或视图"对话框中选择course_v值设置为60。按钮，在"排序依据"中选择按"商品号"升序，"分组视图，在字段中选择所有字段，设置查询去向为表 3、将文本框的InputMask属性值设置为依据"中选择"商品号"，以文件名viewone保存该视se.dbf。 图。利用刚创建的视图viewone查询视图中的全部信三、 1(建立一个文件名和表单名均为oneform99999.99。 4、设置"显示"按钮的Click事件代码:wait 息，在"添加表或视图"对话框中选择viewone视图，的表单，表单中包括两个标签(Label1和Label2)、str(thisform.text1.value,8,2) window。 在字段中选择所有字段，设置查询去向为表一个选项组(Optiongroup1)、一个组合框(Combo1)二、 1(编写SELECT语句，从customers(客户)tabletwo。 和两个命令按钮(Command1和Command2)，Label1和表中统计各年份出生的客户人数。统计结果依次包含三、 在考生文件夹下创建一个顶层表单2(将"学院表"添加到表单的数据环境中， ?在"年份"和"人数"两个字段，各记录按年份升序排序， myform.scx(表单的标题为"考试")，然后创建并在命令窗口输入命令:CREATE FORM oneform，打开表第1题:本题的考查点是利用SQL_SELECT语句建立查表单中添加菜单(菜单的名称为mymenu.mnx，菜单程单设计器窗口。 询。其命令如下: 序的名称为mymenu.mpr)。效果如下图所示。 ?在表单上添加各标签、选项组、组合框和命令 SELECT year(Customers.出生日期) as 年份,; 1、建立表单:可通过"文件"菜单下的"新建"按钮，并进行适当的布置和大小调整。根据题面要求 COUNT(Customers.客户号) as 人数; 命令或用命令CREATE FORM打开表单设计器。 设置标签、选项组、组合框和命令按钮以及表单的属 FROM customers; 2、修改表单各属性值，CAPTION="考试"。将表性值。 GROUP BY 1; 单以myform.scx为文件名保存在考生文件夹下。 ?为表单添加数据库环境，在"显示"菜单下打开 ORDER BY 1; 3、建立菜单:可通过"文件"菜单下的"新建"命"数据环境"或在表单上点击右键打开"数据环境"。 INTO TABLE tableone.dbf 令或用命令CREATE MEMU打开菜单设计器。点击"显示 ?将组合框的RowSourceType属性值设置为6， 然后将此命令保存在pone.prg文件中。 "菜单下的"常规选项"命令打开"常规选项"对话框，RowSource属性值设置为"学院表.系名"。 第2题:创建数据库可以使用"文件"菜单完成，选中"顶层表单"复选框。在菜单设计器中建立各菜单 ?设置"生成"按钮的Click事件代码: 选择文件--新建--数据库--新建文件，在数据库设计项，菜单名称分别为:计算和退出。在"计算"菜单的 IF thisform.optiongroup1.option1.value=1 器中依次添加customers和orders表。再通过新建命结果列中选择"过程"，并通过单击"创建"按钮打开一 SELECT 学院表.系名,教师表.系号,AVG(教令打开视图设计器，在"添加表或视图"对话框中添加个窗口来添加"计算"菜单项要执行的命令: 师表.工资) as 平均工资 FROM 学院表,教师表; customers和orders表，并设置两表间的联系;在"字 CLOSE DATA WHERE 学院表.系号=教师表.系号 AND 学段"选项卡中选择订单号、签订日期、姓名和联系电 USE Orders 院表.系名=thisform.combo1.value; 话4个字段;切换到"筛选"选项卡，在其中进行如下 GO TOP INTO TABLE salary.dbf 设置: DO WHILE NOT EOF() ELSE 字段名 条件 实例 dingdanhao=订单号 SELECT 学院表.系名,教师表.系号,SUM(教YEAR(Orders.签订日期) = 2007 SELECT sum(Orderitems.数量* Goods.单价) 师表.工资) as 总工资 FROM 学院表,教师表; 切换到"排序依据"中选择字段"order.签订日期"，在FROM orderitems,goods; WHERE 学院表.系号=教师表.系号 AND 学"排序选项"处选择"降序"，最后将视图保存在 WHERE Orderitems.商品号=Goods.商品号 院表.系名=thisform.combo1.value; viewone文件中。利用刚创建的视图viewone查询视图AND orderitems.订单号=dingdanhao; INTO TABLE salary.dbf 中的全部信息，在"添加表或视图"对话框中选择 GROUP BY Orderitems.订单号 INTO ARRAY A ENDIF viewone视图，在字段中选择所有字段，设置查询去 REPLACE 总金额 WITH A[1] ?设置"退出"按钮的Click事件代码: 向为表tabletwo。 SKIP thisform.release 三、(1)利用SELECT语句产生goods(商品)表的一 ENDDO ?保存表单并运行，在选项组中选择"平均工资个副本goods_t表。 在"退出"菜单的结果列中选择"过程"，并通过单"，在组合框中选择"信息管理"，单击"生成"命令按 ( 利用"文件"菜单下的"打开"命令打开程击"创建"按钮打开一个窗口来添加菜单项要执行的钮， 序文件ptwo.prg或者用命令:MODIFY COMMAND 命令:myform.release，用来关闭表单并返回到系统最后，单击"退出"命令按钮。 ptwo.prg来打开文件。 菜单。 一、1(新建一个数据库文件College，将自由表"教 语句1为:set relation to 商品号 into goods_t 最后点击"菜单"下的"生成"命令，生成师表"、"课程表"和"学院表"加入该数据库。2(通过或其等价语句。 mymenu.mpr程序。 表设计器为"教师表"的"职工号"字段增加有效性规 语句2为:set relation to 订单号 into 4、将表单myform.scx中的ShowWindow属性设置则:职工号的最左边四位字符是"1102"。 orderitems或其等价语句。 为"2-作为顶层表单"，并在表单的LOAD事件中输入: 1、创建数据库可以使用"文件"菜单完成，选择 语句3为:if 数量>goods_t.库存量或其等价语do mymenu.mpr with this,'mymenu'，执行菜单程序。 文件--新建--数据库--新建文件，在数据库设计器中句。 5、保存并运行表单，依次执行其中的"计算"和"依次添加"教师表"、"课程表"和"学院表"。 语句4为:skip -n或其等价语句。 退出"菜单命令。 2、在教师表的表设计器中，选中"职工号"字段， 并在"字段有效性"的"规则"文本框中输入:LEFT(职选择字段"Goods.商品名"，在"排序选项"处选择"降击查询菜单下的"查询去向"，选择表，在"表名"右边工号,4)="1102"。点击"确定"按钮，保存对表结构的序";单击查询菜单下的查询去向，选择表，输入表的对话框中输入表名TWO，最后运行该查询。 修改。 名tableone，最后将查询保存在queryone.qpr文件 第2题:利用"文件"菜单下的"打开"命令打开程 3、打开one.prg程序，将第4条语句修改为:中，并运行该查询。 序文件THREE.PRG。将命令文件修改为: i=i+2。 第2题:创建数据库可以使用"文件"菜单完成， OPEN DATABASE sdb 4、打开"新建"对话框，在"文件类型"选项卡中选择文件--新建--数据库--新建文件，在数据库设计 SELECT student.学号,姓名,AVG(成绩) 平均成选择"表单"，单击"向导"按钮，再选择"表单向导"，器中依次添加order、orderitem和goods表。再通过绩,COUNT(成绩) 选课门数; 然后按照表单向导操作即可。 新建命令打开视图设计器，在"添加表或视图"对话框 FROM student JOIN sc ON student.学号=sc.学二 1(请修改并执行程序four.prg。程序four.prg中添加order、orderitem和goods表，并设置三表间号; 的功能是:计算每个系的平均工资和最高工资并存入 的联系;在"字段"选项卡中选择订单号、签订日期、 WHERE 性别 = "女"; 第1题:本题是一个程序修改题。修改后的程序为: 商品名、单价和数量5个字段;切换到"筛选"选项卡， GROUP BY student.学号 HAVING AVG(成绩)>= SELECT 系名,avg(工资) as 平均工资,max(工资) 在其中进行如下设置: 75; as 最高工资; 字段名 条件 实例 ORDER BY 4 desc; FROM 教师表,学院表 WHERE 教师表.系号=学院order.客户名 = "lilan" INTO TABLE three 表.系号; 切换到"排序依据"中选择字段"order.订单号"，在"三、1("查询"按钮(Command1):在该按钮的Click GROUP BY 学院表.系号; 排序选项"处选择"升序"，再选择字段"Goods.商品名事件中使用SQL的SELECT命令查询每个学生所选的所 ORDER BY 3 DESC,2 DESC; "，在"排序选项"处选择"升序"，最后将视图保存在有课程的成绩都是60分以上(包括60分)的学生的学 INTO table three viewone文件中。利用刚创建的视图viewone查询视?建立表单:可通过"文件"菜单下的"新建"命令或用 第2题:建立查询可以使用"文件"菜单完成，选图中的全部信息，新建一个查询，在"添加表或视图"命令CREATE FORM打开表单设计器。 择文件--新建--查询--新建文件，将"课程表"和"教对话框中选择viewone视图，在字段中选择所有字段， ?在表单上添加两个命令按钮，并进行适当的布师表"添加到查询设计器中，在"字段"选项卡选择"姓设置查询去向为表tabletwo。 置和大小调整。 "、"课程名"、"学时"字段;切换到"筛选"中选择"三、 在考生目录下建立表单文件formone.scx， ?设置命令按钮的Caption属性值。 名课程表.学时"，"条件"选择">="，"实例"中输入60;要求包含一个标签、一个文本框和一个命令按钮(它 ?设置"查询"按钮的Click事件代码: 们的名称依次为Label1、Text1和Command1);表单的,Student.姓名,AVG(成绩) 切换到"排序依据"中选择字段"课程表.学时"，在"排 SELECT Student.学号序选项"处选择"升序"，选择"教师表.姓名"字段，在标题为"综合应用"。如下图所示: AS 平均成绩,; ?建立表单:可通过"文件"菜单下的"新建" MIN(成绩) AS 最低分; "排序选项"处选择"降序";单击查询菜单下的查询去向，选择表，输入表名five，最后将查询保存在命令或用命令CREATE FORM打开表单设计器。 FROM sdb!student INNER JOIN sdb!sc ; ON Student.学号=Sc.学号; course_q.qpr文件中，并运行该查询。 ?在表单上添加标签、文本框和命令按钮，并进三 1(建立一个文件名和表单名均为oneform的表行适当的布置和大小调整。 GROUP BY Student.学号 HAVING MIN(成绩)>=60; 单，表单中一个页框Pageframe1和两个命令按钮 ?设置标签、命令按钮、表单的Caption属性值。 ORDER BY Student.学号; Command1(生成)和Command2(退出)，Pageframe1 ?设置"确定"按钮的Click事件代码: INTO TABLE four.dbf ?在命令窗口输入命令:CREATE FORM oneform，打 select Order.*,Goods.商品名,Goods.单 ?设置"退出"按钮的Click事件代码: ,Orderitem.数量; thisform.release 开表单设计器窗口。 ?在表单上添加页框、组合框、价选项组和命令按钮，并进行适当的布置和大小调整。 from goods,orderitem,order; ?保存表单并运行，单击"查询"按钮，再单击" where Order.订单号=Orderitem.订单号 and 退出"按钮。 根据题面要求设置页框、组合框、选项组和命令按钮以及表单的属性值。?为表单添加数据库环境，在"Goods.商品号=Orderitem.商品号; 一、1(在学生表STUDENT中增加一个名为"照片"的字 and Goods.商品号=thisform.Text1.Text; 段、字段数据类型为"通用"。 显示"菜单下打开"数据环境"或在表单上点击右键打开"数据环境"。将组合框的RowSourceType属性值设 order by Order.订单号 into table 2(在教师表TEACHER中建立一个索引名为"教师 置为6，RowSource属性值设置为"学院表.系名"。 tablethree.dbf 1、打开STUDENT表设计器，将光标移动到最后的 ?设置"生成?保存表单并运行，在文本框中输入a00002，空字段格中，输入新的字段名、字段类型。 "按钮的Click事件代码: IF 并单击"确定"命令按钮。 2、打开TEACHER表的表设计器，打开"索引"选项一、1(为学生表STUDENT的卡，在索引名处输入:教师号，类型选择"主索引"，thisform.Pageframe1.Page2.optiongroup1.option"性别"字段增加约束:性1.value=1 别$"男女"，出错提示信息为"性别必须是男或女"，升序，表达式为:教师号。打开COURSE表的表设计器，默认值为"女打开"索引 SELECT 学院表.系名,教师表.系号,AVG(教"。 2(为学生表STUDENT创建一个主索 "选项卡，在索引名处输入:教师号，类型师表.工资) as 平均工资 FROM 学院表,教师表; 1、利用"文件"菜单下的"打开"命令打开数据库选择"普通索引"，升序，表达式为:教师号。 WHERE 学院表.系号=教师表.系号"SDB"。再打开"STUDENT"表的表设计器，选择"性别 AND 学" 3、在数据库设计器中，选中STUDENT表中的索引院表.系名字段，在其字段有效性规则栏中输入:性别$"男女"，"学号"并拖动到SC表的"学号"的索引上并松开，这样在信息栏中输入:"性别必须是男或女"，在默认值栏两个表之间就建立起了永久联系。建立好永久联系之=thisform.Pageframe1.Page1.combo1.value; INTO TABLE salary.dbf 中输入:"女"。 后，在两处表的"学号"索引之间有一条线，单击这条 ELSE 2、打开STUDENT表的表设计器，打开"索引"选项表示两个表之间联系的线，线会加粗，此时在主菜单 SELECT 学院表.系名,教师表.系号,SUM(教卡，在索引名处输入:sid，类型选择"主索引"，表中选择"数据库"中的"编辑参照完整性(I)"，系统弹师表.工资) as 总工资 FROM 学院表,教师表; 达式为:学号。打开COURSE表的表设计器，打开"索出"参照完整性生成器"对话框，在"更新规则"标签 WHERE 学院表.系号=教师表.系号 AND 学引"选项卡，在索引名处输入:cid，类型选择"主索中，选择"级联"规则，在"删除"规则中选择"限制"，院表.系名引"，表达式为:课程号。再打开SC表的表设计器，在"插入规则"中选择"限制"，单击"确定"保存所编辑=thisform.Pageframe1.Page1.combo1.value; 打开"索引"选项卡，在索引名处输入:scid，类型选的参照完整性。再用同样的方法设置SC与COURSE、 INTO TABLE salary.dbf 择"主索引"，表达式为:学号+课程号;接着，在索TEACHER与COURSE间的永久联系和参照完整性。 ENDIF 引名处输入:sid，类型选择"普通索引"，升序，表4、启动表单向导可在"文件"菜单中选择"新建" ?设置"退出"按钮的Click事件代码: 达式为:学号;再在索引名处输入:cid，类型选择"或者单击工具栏上的"新建"按钮，打开"新建"对话 thisform.release 普通索引"，升序，表达式为:课程号。 框，文件类型选择表单，单击向导按钮，然后按照向 ?保存表单并运行，在选项组中选择"总工资"， 3、在数据库设计器中，选中STUDENT表中的索引导提示操作即可。 在组合框中选择"通信"，单击"生成"命令按钮进行计"sid"并拖动到SC表的"sid"的索引上并松开，这样两二、:(使用查询设计器设计一个名称为SVG的查询，算。最后，单击"退出"命令按钮结束。 个表之间就建立起了永久联系。再选中COURSE表中的查询每个"女"同学的学号(来自STUDENT表)、姓名、一、 在考生文件夹下有一表单文件myform.scx，索引"cid"并拖动到SC表的"cid"的索引上并松开。建课程名、成绩和任课教师(来自Teacher表的教师名)，其中包含"请输入(s)"标签、Text1文本框，以及"确。 立好永久联系之后，在两处表的"sid"索引之间有一查询结果按学号升序排序并输出到表ONE(查询去向。 1、打开表单myform，将表单的Name属性值设置条线，单击这条表示两个表之间联系的线，线会加粗， 第1题:建立查询可以使用"文件"菜单完成，选为myform，Caption属性值设置为"表单操作"。 此时在主菜单中选择"数据库"中的"编辑参照完整性择文件--新建--查询--新建文件，将"STUDENT"、 2、将标签的TabIndex属性设置为1，文本框的(I)"，系统弹出"参照完整性生成器"对话框，在"更"SC"、"COURSE"和"Teacher"表添加到查询中，从字TabIndex属性设置为2，命令按钮的TabIndex属性设新规则"标签中，选择"级联"规则，在"删除"规则中段选项卡中依次选择"学号"、"姓名"、"课程名"、"置为3。 选择"限制"，在"插入规则"中选择"限制"，单击"确成绩"，在"函数和表达式"中输入"教师名 AS 任课教 3、在"表单"菜单中选择"新建方法程序"命令，定"保存所编辑的参照完整性。再用同样的方法设置师"，并添加到选定字段中;切换到"排序依据"选项新建一个名为mymethod的方法，在myform表单的属性SC与COURSE间的永久联系的参照完整性。 卡并在其中选择字段"学号"，排序选项为"升序";切窗口中双击此方法打开用户自定义过程代码，输入:4、启动报表向导可在"文件"菜单中选择"新建"换到"筛选"选项卡并在其中选择字段:Student.性wait "文本框的值是"+this.text1.value window 或者单击工具栏上的"新建"按钮，打开"新建"对话别，条件为:=，实例为:"女";单击查询菜单下的" 4、将"请输入(s)"标签的Caption属性设置为:框，文件类型选择报表，单击向导按钮，然后按照向查询去向"，选择表，在"表名"右边的对话框中输入请输入(\命令CREATE FORM打开表单设计器。 号 HAVING SUM(数量*单价)<5000) 成绩 ?在表单上添加两个命令按钮，并进行适当的布 ?设置"退出"按钮的Click事件代码: endcase 置和大小调整。 Release Thisform select kscjb ?设置命令按钮的Caption属性值。 ?保存表单并运行，单击"统计"按钮，再单击" skip ?设置"查询"按钮的Click事件代码: 退出"按钮。 enddo SELECT Student.学号,姓名,AVG(成绩) AS 平均 close all 成绩,; 一、1(在KSB表中增加一个名为"备注"的字段、字段 update test set 总成绩=政治成绩+外语成绩+ COUNT(*) AS 选课门数 FROM Student,Sc GROUP 数据类型为"字符"、宽度为30。 高数成绩+专业课成绩 BY Sc.学号; 2(在考生成绩表KSCJB中给成绩字段设置有效性 SELECT Ksb.考生号, Ksb.姓名, Ksb.性别, Ksb. HAVING COUNT(*)>=4 AND 平均成绩>=75 WHERE 1、打开KSB表设计器，将光标移动到最后的空字单位, Test.政治成绩,; Student.学号=Sc.学号; 段格中，输入新的字段名、字段类型和宽度。 Test.外语成绩, Test.高数成绩, Test.专业课 ORDER BY 平均成绩 DESC INTO DBF TWO 2、打开KSCJB表设计器，选择"成绩"字段，在其成绩, Test.总成绩; ?设置"退出"按钮的Click事件代码: 字段有效性规则栏中输入:成绩>=0.AND.成绩<=150， FROM sdb!ksb INNER JOIN test ; thisform.release 在默认值栏中输入:0。 ON Ksb.考生号=Test.考生号; ?保存表单并运行，单击"查询"按钮，再单击" 3、在数据库设计器中，选中KSB表中的索引"考 WHERE Test.总成绩>=330; 退出"按钮。 生号"并拖动到KSCJB表的"考生号"的索引上并松开， ORDER BY Test.总成绩 DESC INTO TABLE four 一、1(在会员表CUS中增加一个字段，字段名为手机这样两个表之间就建立起了永久联系。建立好永久联 ?设置"退出"按钮的Click事件代码: 号，数据类型为"字符"，宽度为11;在会员购货明细 系之后，在两处表的"考生号"索引之间有一条线，单 Release Thisform 1、打开CUS表设计器，将光标移动到最后的空字段格击这条表示两个表之间联系的线，线会加粗，此时在 ?保存表单并运行，单击"录取"按钮，再单击"中，输入新的字段名、字段类型和宽度。再打开CBC主菜单中选择"数据库"中的"编辑参照完整性(I)"，退出"按钮。 表设计器，选择"数量"字段，在其字段有效性规则栏 系统弹出"参照完整性生成器"对话框，在"更新规则"中输入:数量>=1，在默认值栏中输入:1;选择"单标签中，选择"级联"规则，在"删除"规则中选择"限一、 在考生文件夹下，有一个资源数据库FRDB，价"字段，在其字段有效性规则栏中输入:单价>=1，"，在"插入规则"中选择"忽略"，单击"确定"保存该数据库有资源表FR_T、农户表P_T和树种表TREE_T制在默认值栏中输入:1。 所编辑的参照完整性。 三个表。其中，资源表FR_T存储了全乡农民承包的土 2、打开CBC表的表设计器，打开"索引"选项卡， 4、启动报表向导可在"文件"菜单中选择"新建"地编号、户主编号、小地名、面积、树种编号、蓄积 在索引名处输入:cbc，类型选择"主索引"，表达式或者单击工具栏上的"新建"按钮，打开"新建"对话 1、打开P_T表设计器，将光标移动到最后的空字为:会员号+商品号+DTOC(日期)。 框，文件类型选择报表，单击向导按钮，然后按照向段格中，输入新的字段名、字段类型和宽度。 3、接着在索引名处输入:会员号，类型选择"普导提示操作即可。 2、打开FR_T表设计器，选择"面积"字段，在其通索引"，升序，表达式为:会员号;再在索引名处二、1(使用一对多表单向导选择KSB表和KSCJB表生字段有效性规则栏中输入:面积>=1.AND.面积<=100，输入:商品号，类型选择"普通索引"，升序，表达式成一个名为TWO的表单。要求从父表KSB中选择所有字在默认值栏中输入:10，再选择"蓄积"字段，在其字为:商品号。在数据库设计器中，选中CUS表中的索段，从子表KSCJB中选择所有字段，使用"考生号"建 段有效性规则栏中输入:蓄积>=0.AND.蓄积<=200，引"会员号"并拖动到CBC表的"会员号"的索引上并松 第1题:启动表单向导可在"文件"菜单中选择" 在默认值栏中输入:100。开，这样两个表之间就建立起了永久联系。再用同样新建"或者单击工具栏上的"新建"按钮，打开"新建" 3、打开"索引"选项卡，在索引名处输入:户主的方法设置COMM与CBC间的永久联系。 对话框，文件类型选择表单，单击向导按钮，在"向编号，类型选择"普通索引"，升序，表达式为:户主 4、使用SQL语句查询相应的记录值，SQL命令为: 导选取"对话框中选择"一对多表单向导"，然后按照编号，再在索引名处输入:树种编号，类型选择"普 SELECT 会员号,会员名,单位 FROM cus INTO 表单向导操作即可。 通索引"，升序，表达式为:树种编号。 TABLE ncus.dbf 第2题:利用"文件"菜单下的"打开"命令打开程 4、在数据库设计器中，选中P_T表中的索引"户 并将此语句存储到名为ONE.PRG的文件中。 序文件THREE.PRG。将命令文件修改为: 主编号"并拖动到FR_T表的"户主编号"的索引上并松二、: 1(使用查询设计器设计一个名称为TWO的查询， SELECT AVG(成绩开，这样两个表之间就建立起了永久联系。再用同样); 查询2003年会员购买商品的情况，将结果按会员号排 FROM kscjb; 的方法设置FR_T和TREE_T表间的永久联系。 2 第二、 1(使用表单向导选择资源表FR_T生成一个名为1题:建立查询可以使用"文件"菜单完成，选 INTO ARRAY tem 择文件--新建--查询--新建文件，将"COMM"、"CBC" SELECT 考生号,姓名; FR_EDIT的表单。要求选择FR_T表中所有字段，样式 和第1题:启动表单向导可在"文件"CUS"表添加到查询中，从字段选项卡中依次选择" FROM ksb; "菜单中选择"新建"会员号"、"会员名、"商品名"，在"函数和表达式"中 WHERE not exists; 或者单击工具栏上的"新建"按钮，打开"新建"对话框，文件类型选择表单，单击向导按钮，然后按照向输入"数量*单价 AS 金额"，并添加到选定字段中; ( SELECT *; 切换到"筛选"选项卡，在表达式中输入:"year(Cbc. FROM kscjb; 导提示操作即可。 日期)"， 第"条件"选择"="，"实例"中输入2003;切换 WHERE 成绩=10; close all 三 1(为表单建立数据环境，向数据环境依次添加 GROUP BY 会员号 HAVING SUM(数量*单 CREATE TABLE test(考生号 C(4),政治成绩 FR_T表(Cursor1)、P_T表(Cursor2)和TREE_T表 价)>=5000); N(5,1),外语成绩 N(5,1),高数成绩 N(5,1),专业课?建立表单:可通过"文件"菜单下的"新建"命令或用 INTO TABLE THREE 成绩 N(5,1),总成绩 N(5,1)) 命令CREATE FORM打开表单设计器。为表单添加数据三、 1(建立文件名为form的表单，在表单中设计" use 库环境，在"显示"菜单下打开"数据环境"或在表单上统计"和"退出"两个按钮。要求如下: select 2 点击右键打开"数据环境"。 (1)在"统计"按钮(Command1)中，编写程序， use test ?在表单上添加5个标签、5个文本框、2个命令根据会员统计时所购买商品的总金额(数量*单价)， select 1 按钮和1个表格控件，并进行适当的布置和大小调整。 确定该会员为"金卡会员"、"银卡会员"、"铜卡会员" use kscjb ?设置标签、文本框、窗体和命令按钮的Caption ?建立表单:可通过"文件"菜单下的"新建" do while .not.eof() 属性值。设置表格控件的RecordSourceType属性值。 命令或用命令CREATE FORM打开表单设计器。 select test ?设置"查询"按钮的Click事件代码: ?在表单上添加两个命令按钮，并进行适当的布 locate for 考生号=kscjb->考生号 select 姓名,年龄,性别,家庭地址 from p_t 置和大小调整。 if not found() then where 户主编号=alltrim(ThisForm.Text1.Value) ?设置命令按钮的Caption属性值。 append blank into array tmp ?设置"统计"按钮的Click事件代码: replace 考生号 with kscjb->考生号 ThisForm.Text2.Value=tmp(1) UPDATE CUS SET 会员类型="金卡会员" WHERE 会 endif ThisForm.Text3.Value=tmp(2) 员号=ANY(SELECT 会员号 FROM cbc GROUP BY 会员 do case ThisForm.Text4.Value=tmp(3) 号 HAVING SUM(数量*单价)>=15000) case kscjb->考试科目="101" ThisForm.Text5.Value=tmp(4) UPDATE CUS SET 会员类型="银卡会员" WHERE 会 replace 政治成绩 with kscjb->成 ThisForm.Grid1.RecordSource="SELECT 土地员号=ANY(SELECT 会员号 FROM cbc GROUP BY 会员绩 编号,小地名,面积,树种编号,蓄积,承包年度 FROM 号 HAVING SUM(数量*单价)<15000 AND SUM(数量*单 case kscjb->考试科目="102" fr_t WHERE 户主编号价)>=10000) replace 外语成绩 with kscjb->成='"+alltrim(ThisForm.Text1.Value)+"' INTO UPDATE CUS SET 会员类型="铜卡会员" WHERE 会绩 CURSOR LSB" 员号=ANY(SELECT 会员号 FROM cbc GROUP BY 会员 case kscjb->考试科目="103" ?设置"退出"按钮的Click事件代码: 号 HAVING SUM(数量*单价)<10000 AND SUM(数量*单 replace 高数成绩 with kscjb->成 Release Thisform 价)>=5000) 绩 ?保存表单并运行。 UPDATE CUS SET 会员类型="普通会员" WHERE 会 case kscjb->考试科目="104" 一、1(建立数据库orders_manage。 2(将自由表employee和orders添加到新建的4-SQL说明 ThisForm.Grdorders.RecordSource="SELECT * orders_manage数据库中。 PageFrame1.page3.grid1 RecordSource FROM orders WHERE 职工号=='"+zgh+"' INTO CURSOR 1、建立数据库的常用方法有三种: sele employee.职工号,姓名,sum(金额) as 总金额 LSB" 在项目管理器中建立数据库; from employee,orders where employee.职工号 ?设置"Close"按钮的Click事件代码: 通过"新建"对话框建立数据库; =orders.职工号 group by orders.职工号 into THISFORM.RELEASE 使用命令交互建立数据库，命令为:CREATE cursor temp ?保存表单，关闭表单设计器窗口。 DATABASE [DatabaseName|?] 第三步:命令按钮command1(退出)的Click事 2、将自由表添加到数据库中，可以在项目管理件代码如下: 一 1(建立名称为"CDB"的商品销售数据库。器或数据库设计器中完成。打开数据库设计器，在" thisform.release 然后将考生文件夹下的顾客表CUST、订单表ORDER和 数据库"菜单中或在数据库设计器上单击右键，在弹 第四步:保存表单并运行。 1、建立数据库的常用方法有三种: 出的菜单中选择"添加表"，然后在"打开"对话框中选一、 1(建立数据库orders_manage，并将自由表 在项目管理器中建立数据库; 择要添加到当前数据库中的自由表。 employee和orders添加到新建的数据库中。 通过"新建"对话框建立数据库; 3、打开employee表的表设计器，打开"索引"选 本题的主要考核点:数据库的建立、将自由表添 使用命令交互建立数据库，命令为:CREATE 项卡，在索引名处输入:职工号，类型选择"主索引"，加到数据库中、主索引和普通索引的建立、建立两个DATABASE [DatabaseName|?] 升序，表达式为:职工号。打开orders表的表设计器，表之间的联系、项目的建立、将数据库添加到项目中、 将自由表添加到数据库中，可以在项目管理器或打开"索引"选项卡，在索引名处输入:职工号，类型视图的建立。 数据库设计器中完成。打开数据库设计器，在"数据选择"普通索引"，表达式为:职工号。 1、建立数据库的常用方法有三种: 库"菜单中或在数据库设计器上单击右键，在弹出的 4、在数据库设计器中，选中employee表中的索 在项目管理器中建立数据库; 菜单中选择"添加表"，然后在"打开"对话框中选择要引"职工号"并拖动到orders表的"职工号"的索引上 通过"新建"对话框建立数据库; 添加到当前数据库中的自由表。 并松开，这样两个表之间就建立起了永久联系。建立 使用命令交互建立数据库，命令为:CREATE 2、打开CUST表的表设计器，打开"索引"选项卡，好永久联系之后，在两处表的"职工号"索引之间有一DATABASE [DatabaseName|?] 在索引名处输入:顾客号，类型选择"主索引"，表达条线，单击这条表示两个表之间联系的线，线会加粗， 将自由表添加到数据库中，可以在项目管理器或式为:顾客号，用同样的方法设置COMM表和ORDER表此时在主菜单中选择"数据库"中的"编辑参照完整性数据库设计器中完成。打开数据库设计器，在"数据的主索引。打开ORDER表的表设计器，打开"索引"选库"菜单中或在数据库设计器上单击右键，在弹出的(I)"，系统弹出"参照完整性生成器"对话框，在"更项卡，在索引名处输入:顾客号，类型选择"普通索新规则"标签中，选择"级联"规则，在"删除"规则中菜单中选择"添加表"，然后在"打开"对话框中选择要引"，升序，表达式为:顾客号;接着，在索引名处择"级联"，在"插入规则"中选择"限制"，单击"确选添加到当前数据库中的自由表。 输入:商品号，类型选择"普通索引"，升序，表达式定"保存所编辑的参照完整性。 2、打开employee表的表设计器，打开"索引"选为:商品号。 二、1(使用SQL语句查询每个职工所经手的具有最高项卡，在索引名处输入:职工号，类型选择"主索引"， 3、在数据库设计器中，选中CUST表中的索引"顾金额的订购单信息(orders表)，并将结果按金额升 表达式为:职工号。打开 orders表的表设计器，打开客号"并拖动到ORDER表的"顾客号"的索引上并松开，第1题:SQL语句为: "索引"选项卡，在索引名处输入:职工号，类型选择这样两个表之间就建立起了永久联系。建立好永久联 SELECT * FROM orders ORDER BY 金额,订购单"普通索引"，表达式为:职工号。在数据库设计器中，系之后，在两处表的"顾客号"索引之间有一条线，单号 WHERE 职工号+str(金额,10,0) IN; 选中employee表中的索引"职工号"并拖动到orders击这条表示两个表之间联系的线，线会加粗，此时在 (SELECT 职工号+str(MAX(orders.金额),10,0) "编辑参照完整性(I)"，表的"职工号"的索引上并松开，这样两个表之间就建主菜单中选择"数据库"中的FROM orders GROUP BY 职工号); 立起了永久联系。 系统弹出"参照完整性生成器"对话框，在"更新规则" INTO TABLE results Visual FoxPro主窗口下按组合键Ctrl+N，标签中，选择"级联"规则，在"删除"规则中选择"限 3、在 第2题:SQL命令为: 则系统弹出"新建"对话框，在文件类型中选择"项目制"，在"插入规则"中选择"限制"，单击"确定"保存 create view view_b as; "，再点击"新建文件"按钮，选定考生文件夹，在项所编辑的参照完整性。再用同样的方法设置COMM表与 select * from employee; 目文件中填入"职工订单管理"，再点击保存按钮;这ORDER表间的永久联系和参照完整性。 where 职工号 not in; 样便新建了一个项目，在弹出的项目管理器中先选择 4、SQL语句为: (select 职工号 from orders); "数据"标签，再选择"数据库"，最后点击"添加"按钮; create table 销售明细表(顺序号 C(6) order by 仓库号 desc 在弹出的"打开"对话框中的"选择数据库"处，选择primary key,日期 D,商品号 C(6),商品名 C(10),金 然后将此命令保存在view_b.txt文件中。 "orders_manage"数据库。 额 N(10,2)) 三 1(表单中含有一个页框控件(PageFrame1)和一 4、在选择"orders_manage"数据库下选择" 然后将此命令保存在ONE.PRG文件中。 个本地视图"，单击"新建"，选择"新建视图"，添加二、 1(使用一对多表单向导选择CUST表和"退出"命令按钮(Command1)，单击"退出"命令按钮关闭并释放表单; "employee"表到视图中，先选择"职工号"、"姓名"字ORDER表生成一个名为"ONE"的表单。要求从父表CUST 段，再在"函数与表达式"中输入第1题:启动表单向导可在"文件 第一步:在Visual FoxPro主窗口中按下组合键"菜单中选择"新建"Ctrl+N，系统弹出"新建"对话框，在文件类型中选择"YEAR(DATE())-YEAR(出生日期) AS 年龄"，单击"添或者单击工具栏上的"新建"按钮，打开"新建"对话加"按钮，在"排序依据"中选择按框，文件类型选择表单，单击向导按钮，在"向导选"表单"，点击"新建文件"按钮，系统将打开表单设计器;或直接在命令窗口中输入:crea form form1。"YEAR(DATE())-YEAR(出生日期) AS 年龄"降序，以取"对话框中选择"一对多表单向导"，然后按照表单在"表单设计器"中，单击鼠标右键，在弹出菜单中选文件名view_ca保存该视图。 向导操作即可。 择"数据环境"，在"添加表或视图"对话框中，选择二、1(使用向导建立一对多报表report_c，选择父 第2题:建立查询可以使用"文件"菜单完成，选employee表，单击"添加"，接着在"添加表或视图"的表employee中仓库号、职工号、姓名字段以及子表 择文件--新建--查询--新建文件，将"CUST"、"ORDER"对话框中，选择orders表，单击"添加"，再单击"关 第1题:启动报表向导可在"文件"菜单中选择"新和"COMM"表添加入查询中，从字段选项卡中依次选择闭"按钮。选择employee和orders之间的连线，单击建"或者单击工具栏上的"新建"按钮，打开"新建"对"顾客号"、"顾客名"、"地址"，在"函数和表达式"中Delete键。 话框，文件类型选择报表，单击向导按钮，然后按照输入"SUM(Comm.单价*Order.数量) AS 付款金额"， 第二步:点击工具栏按钮"表单控件工具栏"，在向导提示操作即可。 并添加到选定字段中;切换到"排序依据"选项卡并在弹出的"表单控件"对话框中，选中"页框"控件，在表 第2题:SQL命令为: 其中选择字段"CUST.顾客号"，排序选项为"升序";单设计器中拖动鼠标，这样在表单上得到一个"页框" create view view_cb as; 切换到"分组依据"选项卡并在其中选择字段"CUST.控件PageFrame1，用类似的方法为表单再加入三个" select employee.职工号,姓名,; 顾客号";单击查询菜单下的"查询去向"，选择表，表格"控件(右击页框，点击编辑按钮)，1个"命令 sum(金额) as 总金额; 在"表名"右边的对话框中输入表名TABA，最后运行该按钮"控件command1。相关控件的属性值如下表所示: from employee,orders; 查询。 对象 属性 where employee.职工号=orders.职工号; 三、 创建设计一个标题名为"查询"、文件名为属性值 group by employee.职工号; "TWO"的表单，如下图所示。 Form1 Name having sum(金额)>15000; 1(为表单建立数据环境，依次向数据环境myform_b order by 总金额 asc 添加ORDER、CUST和COMM表。 Form1 Caption 订单管理 然后将此命令保存在cmd_cb.txt文件中。 ?在命令窗口输入命令:CREATE FORM TWO， Command1 Caption 退出 三、 建立一个表单，表单文件名和表单控件名均打开表单设计器窗口。为表单添加数据库环境，在" PageFrame1 pagecount 3为myform_c，表单标题为"职工订单信息"，表单界面 显示 "菜单下打开"数据环境"或在表单上点击右键打 ?在命令窗口输入命令:CREATE FORM myform_c，打开"数据环境"。 PageFrame1.page1 Caption 职工 开表单设计器窗口。 ?在表单上添加各标签、文本框、表格、命令按 PageFrame1.page2 Caption 订单 ?在表单上添加各标签、文本框、表格、命令按钮，并进行适当的布置和大小调整。 PageFrame1.page3 Caption 职工订钮，并进行适当的布置和大小调整。 ?根据题面要求设置各标签、表格、命令按钮以单金额 ?根据题面要求设置各标签、表格、命令按钮以及表单的属性值。 PageFrame1.page1.grid1 Name 及表单的属性值。 ?将表格Grid1和Grid2的RecordSourceType属grdEmployee ?将表格的RecordSourceType属性值设置为性值设置为"4-SQL说明"。 PageFrame1.page1.grid1 RecordSourceType "4-SQL说明"。 ?设置"查询"按钮的Click事件代码: 1-别名 ?设置"Do"按钮的Click事件代码: GKh=ALLTRIM(ThisForm.Text1.Value) PageFrame1.page1.grid1 RecordSource zgh=ALLTRIM(ThisForm.Text1.Value) ThisForm.Grid1.RecordSource="SELECT 顾客Employee If Used("employee") 号,顾客名,地址 FROM CUST WHERE 顾客号 PageFrame1.page2.grid1 Name SELECT employee =='"+GKh+"' INTO TABLE TABB" grdOrders ELSE ThisForm.Grid2.RecordSource="SELECT Comm. PageFrame1.page2.grid1 RecordSourceType USE employee 商品号,商品名,单价,数量,Comm.单价* Order.数量 1-别名 ENDIF as 金额 FROM cdb!comm INNER JOIN cdb!order ON PageFrame1.page2.grid1 RecordSource LOCATE FOR 职工号=zgh Comm.商品号=Order.商品号 WHERE 顾客号Orders ThisForm.Text2.Value=姓名 =='"+GKh+"' INTO TABLE TABC" PageFrame1.page3.grid1 RecordSourceType ThisForm.Text3.Value=性别 ?设置"退出"按钮的Click事件代码: THISFORM.RELEASE 顾客号,Comm.商品号,商品名,单价,数量,Comm.单价mybase。 ?保存表单并运行，在文本框中输入"010003"，* Order.数量 as 金额 FROM cdb!comm INNER JOIN 1、单击"文件"菜单中的"新建"，在类型选择对单击"查询"命令按钮进行计算。最后，单击"退出"命cdb!order ON Comm.商品号=Order.商品号 WHERE 顾话框中选择"项目"，单击"新建文件"按钮，输入文件令按钮结束。 客号=ALLTRIM(ThisForm.Text1.Value) order by 名"myproject"。 一 1(打开名称为SDB的学生数据库，分别为学生表Comm.商品号 INTO TABLE tjb" 2、选择项目管理器中"数据"节点下的"数据库"，Student、选课成绩表SC和课程表Course创建主索引。 SELECT sum(Comm.单价* Order.数量) FROM 单击"新建"按钮，在弹出的对话框中选择"新建数据Student表主索引的索引名和索引表达式均为"学号cdb!comm INNER JOIN cdb!order ON Comm.商品号库"，输入数据库文件名"mybase"，这时，数据库设";Course表主索引的索引名和索引表达式均为"课程=Order.商品号 WHERE 顾客号计器自动打开。 号";SC表的主索引名为PK_SC，索引表达式为"学号=ALLTRIM(ThisForm.Text1.Value) INTO ARRAY temp 3、在数据库设计器中单击右键，选择"添加表"，"+"课程号"的字段组合。 ThisForm.Text2.Value=temp 将考生文件夹下的3个自由表依次添加到数据库中。 1、打开Student表的表设计器，打开"索引"选项 ?设置"退出"按钮的Click事件代码: 4、选择项目管理器中"文档"节点下的"表单"，卡，在索引名处输入:学号，类型选择"主索引"，表 THISFORM.RELEASE 单击"新建"按钮，在弹出的对话框中选择"新建表单达式为:学号，用同样的方法设置SC表和Course表的 ?保存表单并运行，在文本框中输入"010003"，"，这时表单设计器打开，单击工具栏上的保存铵钮，主索引。 单击"查询"命令按钮进行计算。最后，单击"退出"命输入表单名myform，保存表单后关闭表单设计器。 2、在数据库设计器中，选中Student表中的索引令按钮结束。 二、 1(在mybase数据库中建立视图myview，视"学号"并拖动到SC表的"学号"的索引上并松开，这样一、 在考生文件夹下有一表单文件formone.scx，图中包括客户名、订单号、图书名、单价、数量和签两个表之间就建立起了永久联系。建立好永久联系之其中包含一个文本框和一个命令按钮。打开该表单文订日期字段。然后使用SQL SELECT语句查询:"吴"姓 后，在两个表的"学号"索引之间有一条线，单击这条件，然后在表单设计器环境下完成如下操作: 第1题:在mybase数据库设计器中，通过create VIEW表示两个表之间联系的线，线会加粗，此时在主菜单 1(将文本框和命令按钮两个控件设置为顶边对 命令打开视图设计器，在"添加表或视图"对话框中添中选择"数据库"中的"编辑参照完整性(I)"，系统弹 1、打开表单formone，选中标签和命令按钮，选加order、orderitem和goods表，并设置三表间的联出"参照完整性生成器"对话框，在"更新规则"标签择"格式"菜单下"对齐"菜单下的"顶边对齐"。 系;在"字段"选项卡中选择客户名、订单号、图书名、"规则，在"删除规则"中选择"级联"，中，选择"级联 2、将文本框的Value属性值设置为0。 单价、数量和签订日期字段，最后将视图保存在在"插入规则"中选择"限制"，单击"确定"保存所编辑 3、将表单的Caption属性值设置为"基本操作"，myview文件中。接着在命令窗口中输入:"select * SC表"。 的参照完整性。再用同样的方法设置Course表和命令按钮的Caption属性值设置为"确定from myview where 客户名="吴" into table mytable 间的永久联系和参照完整性。 4、设置文本框的InteractiveChange事件代码: order by 客户名,订单号,图书名"，按回车运行此命 3、SQL语句为:delete from student where 学 if thisform.Text1.value<0 令。 号="s3"，然后将此命令保存在ONE.PRG文件中。 thisform.command1.enabled=0 第2题:打开表单文件myform，将表单的CaptionVisual FoxPro主窗口下按组合键Ctrl+N， endif 4、在属性设置为"简单应用"，AutoCenter属性设置为则系统弹出"新建"对话框，在文件类型中选择"项目二、 1(扩展Visual FoxPro基类Form，创建一个".T.-真"。在表单上添加一个命令按钮Command1，"，再点击"新建文件"按钮;在弹出的"创建"对话框名为MyForm的自定义表单类。自定义表单类保存在名Caption属性设置为"退出"，设置"退出"按钮的Click中，选定考生文件夹，在项目文件中填入为myclasslib的类库中。自定义表单类MyForm需满足事件代码:thisform.release。单击"显示"菜单下的"Project_S"，再点击保存按钮;这样便新建了一个以下要求: (1)其AutoCenter属性的默认值为.T.。 "数据环境"子菜单，单击"数据环境"菜单下的"添加" 第1题:建立类可以使用"文件"菜单完成，子菜单，单击"添加表或视图"窗口中的"视图"，选中项目;在弹出的项目管理器中先选择"数据"标签，再选择"数据库"，最后点击"添加"按钮;在弹出的"打选择文件--新建--类--新建文件，在弹出的"新建类"视图"myview"，单击"添加"，将视图myview添加到数开"对话框中的"选择数据库"处，选择SDB数据库。 对话框中:在"类名"右边的文本框中输入:MyForm，据环境中，选中数据环境设计器中的视图myview拖拉二、 1(使用一对多报表向导建立名称为在"派生于"右边的列表框中选择Form，在"存储于"右到表单设计器中，保存表单。 P_ORDER的报表。要求从父表顾客表CUST中选择所有边的浏览中选择考生文件夹，再输入文件名三、 1(打开在基本操作题中建立的项目字段，从子表订单表ORDER中选择所有字段;两表之 myclasslib，单击"确定"按钮，打开"类设计器"窗口，myproject;2(在项目中建立程序SQL，该程序只有 第1题:启动报表向导可在"文件"菜单中选进入类设计器环境。在属性窗口中，将表单的一条SQL查询语句，功能是:查询7月份以后(含)签 择AutoCenter属性设置为.T.，Closable属性设置 1、打开项目myproject。"新建"或者单击工具栏上的"新建"按钮，打开"新 建"对话框，文件类型选择报表，单击向导按钮，在"为.F.。在窗体上添加一个命令按钮，Caption属性为 2、选择项目管理器中"代码"节点下的"程序"，向导选取"对话框中选择"一对多报表向导"，然后按"关闭"，设置"关闭单击"新建"按钮的Click事件代码:"按钮，在弹出的对话框中输入: 照报表向导操作即可。然后打开该报表，在页注脚中thisform.release。 SELECT 客户名,图书名,数量,单价,单价*数量 增加一个标签控件，输入:"制表人:王爱学"，选中AS 金额 第2题:建立查询可以使用"文件"菜单完成，选 ; 该标签，再选择"格式"菜单下的"对齐"子菜单下的"择文件--新建--查询--新建文件，将orders、 FROM mybase!goods INNER JOIN 水平对齐"。 orderitems和goods表添加到查询中，从字段选项卡mybase!orderitem ; 第2题:利用"文件"菜单下的"打开"命令打开程中依次选择"Orders.订单号"、"Orders.客户号"、 INNER JOIN mybase!order ; 序文件TWO.PRG。将命令文件修改为: "Orders.签订日期"，在"函数和表达式"中输入 ON Orderitem.订单号 = Order.订单号 ; CLOSE DBF "SUM(Goods.单价*Orderitems.数量) AS 总金额"， ON Goods.图书号 = Orderitem.图书号 ; PRIVATE no,money 并添加到选定字段中;切换到"筛选"选项卡，在表达 WHERE month(order.签订日期)>=7 ; USE scust 式中输入:"year(Orders.签订日期)"，"条件"选择 ORDER BY 客户名,图书名 INTO TABLE *下面的一行语句有错误 "="，"实例"中输入:2007;切换到"排序依据"选项MYSQLTABLE SELECT 顾客号,sum(数量*单价) 应付款 ; 卡并在其中选择字段"SUM(Goods.单价*Orderitems. 单击工具栏上的保存铵钮，输入:SQL。然后单 FROM order JOIN comm ON order.商品号 = comm.数量) AS 总金额"，排序选项为"降序"，再选择击"保存"。 商品号 ; "Orders.订单号"，排序选项为"升序";切换到"分组 3、选择项目管理器中"其他"节点下的"菜单"， GROUP BY 顾客号 ; 依据"选项卡并在其中选择字段"Orders.订单号";单单击"新建"按钮，在新建菜单窗口中单击"菜单"，在 INTO CURSOR ls 击查询菜单下的"查询去向"，选择表，在"表名"右边"菜单名称"中输入"运行表单"，结果为"命令"，输入: SELECT scust 的对话框中输入表名tableone，最后保存并运行该查do form myform。再在"菜单名称"中输入"执行程序"， *下面的一行语句有错误 询。 结果为"命令"，输入:do sql。接着在"菜单名称"中 DO WHILE .NOT. EOF() 三、 在考生文件夹下创建一个下拉式菜单输入"退出"，结果为"过程"，单击"创建"，输入: no = 顾客号 mymenu.mnx，并生成菜单程序mymenu.mpr。运行该菜 set sysmenu to default SELECT ls 单程序时会在当前vfp系统菜单的末尾追加一个"考 clear events LOCAT FOR 顾客号 = no 试"子菜单，如下图所示。 单击工具栏上的保存铵钮，输入:mymenu。然后 money = 应付款 1、建立菜单可以使用"文件"菜单完成，选择文单击"保存"。 SELECT scust 件--新建--菜单--新建文件打开新建菜单窗口，选择 4、选择项目管理器中"代码"节点下的"程序"， *下面的一行语句有错误 "菜单"按钮，打开菜单设计器。打开"显示"菜单下的单击"新建"按钮，在弹出的对话框中输入: REPLACE 应付款 WITH money "常规选项"对话框，在"位置"处选择追加，则新建立 do mymenu.mpr SKIP +1 的子菜单会在当前vfp系统菜单后显示。 read events ENDDO 2、在菜单名称中填入"考试"，结果为子菜单， 单击工具栏上的保存铵钮，输入:main。然后单 CLOSE TABLE 单击创建;在子菜单的菜单名称中输入"统计"，结果击"保存"。 RETURN 为过程。在过程中输入下列命令: 5、选中程序main，单击鼠标右键，选择"设置主三、 创建一个标题名为"顾客购买商品查询 SELECT Customers.姓名 AS 客户文件"，将其设置成主文件。然后单击项目管理器右"、文件名为GK的表单，如下图所示。 名,count(Orders.订单号) as 订单数; 侧的"连编"命令打开"连编选项"窗口，在操作中选择 表单要求如下: FROM customers INNER JOIN orders ON "连编应用程序"，点击"确定"按钮，输入应用程序名 1(在该表单中设计两个标签、两个文本框、一Customers.客户号=Orders.客户号; myproject，单击"保存"按钮，即可生成连编项目文个表格控件和两个命令按钮。 WHERE year(Orders.签订日期)=2007 GROUP BY 件。最后运行myproject.app，并依次执行"运行表单 ?在命令窗口输入命令:CREATE FORM GK，打Customers.姓名; "、"执行程序"和"退出"菜单命令。 开表单设计器窗口。 ORDER BY 2 DESC,Customers.姓名 INTO TABLE 一、 在考生文件夹下有一表单文件formone.scx， ?在表单上添加各标签、文本框、表格、命令按tabletwo 其中包含一个命令按钮。打开该表单文件，然后在表钮，并进行适当的布置和大小调整。 在菜单名称中填入"返回"，结果为过程，在过程单设计器环境下完成如下操作: 1(将表单的标题设 ?根据题面要求设置各标签、表格、命令按钮以中输入此命令:SET SYSMENU TO DEFAULT。 置为"基本操作";将表单的最大化按钮设置为无效。 及表单的属性值。 3、最后保存菜单mymenu.mnx，并生成菜单程序 1、打开表单formone，将表单的Caption属性设 ?将表格Grid1的RecordSourceType属性值设置mymenu.mpr，且运行菜单程序并依次执行"统计"和"置为"基本操作"，MaxButton属性设置为".F.-假"。 为"4-SQL说明"。 返回"菜单命令。 2、单击"显示"菜单下的"数据环境"子菜单，单 ?设置"查询"按钮的Click事件代码: 一 1(新建一个项目myproject。 击"数据环境"菜单下的"添加"子菜单，在打开文件窗 ThisForm.Grid1.RecordSource="SELECT Order. 2(在新建的项目myproject中建立数据库口中选择customers.dbf，单击"确定"按钮，关闭"添 加表或视图"窗口，则可将数据表customers.dbf添加段选项卡中依次选择"Order.客户名"、"Order.订单 insert into 职称系数表 value ("教授" ,1.4) 到数据环境中。 号"、"Goods.图书名"、"Goods.单价"、"Orderitem. insert into 职称系数表 value ("副教授" ,1.3) 3、将命令按钮的Default属性值设置为".T.-真数量"、"Order.签订日期";切换到"筛选"选项卡，&&有错误 "。 在"字段名"中选择"Order.客户名"，"条件"选择"="， insert into 职称系数表 value ("讲师" ,1.2) 4、选中"工具"菜单下的"选项"命令，选择"控件"实例"中输入:吴;切换到"排序依据"选项卡并在其 insert into 职称系数表 value ("助教" ,1.0) "选项卡，再选择"可视类库"单选按钮，然后单击"添中选择字段"Order.客户名"，排序选项为"升序";单 SELECT 姓名, 系号,课时*80*职称系数+基本工加"按钮。在打开的对话框中，选择考生目录下的类击"查询"菜单下的"查询去向"，选择"表"，在"表名"资 as 应发工资 ; 库文件myclasslib.vcx。单击"表单控件"工具栏上的右边的对话框中输入表名appone，最后保存并运行该 FROM 职称表,职称系数表,教师表 ; "查看类"按钮，然后选择myclasslib，在命令按钮的查询。 &&有错误 上方添加一个mytextbox的控件。 第2题:本题的考查点是SQL语句的使用。其命令 WHERE 职称表.职称级别 = 教师表.职称级二、 1(编写SELECT语句，从orders(订单)表如下: 别 ; 中统计2007年各月份签订的订单数。统计结果依次包 SELECT Order.客户名, sum(orderitem.数量) as AND 职称表.职称名 = 职称系数表.职称名 ; 含"月份"和"订单数"两个字段，并按月份升序排序，订购总册数,; &&有错误 统计结果存放在tableone表中。最后要执行该SELECT sum(orderitem.数量* Goods.单价) as 金额 ; into dbf salary.dbf ; 语句，并将该SELECT语句存放在命令文件pone.prg FROM goods INNER JOIN orderitem INNER JOIN order by 系号 desc,应发工资 中。 order ; 最后保存并运行该程序。 select month(签订日期) as 月份,count(订单 ON Orderitem.订单号 = Order.订单号 ; 第2题:建立类可以使用"文件"菜单完成，选择号) as 订单数 from orders ; ON Goods.图书号 = Orderitem.图书号 ; 文件--新建--类--新建文件，在弹出的"新建类"对话 where year(签订日期)=2007 group by 月份 GROUP BY Order.客户名 ; 框中:在"类名"右边的文本框中输入:MyCheckBox，order by 月份 into table tableone ORDER BY 金额 DESC ; 在"派生于"右边的列表框中选择CheckBox，在"存储 运行该SQL语句，然后将此语句保存在pone.prg INTO TABLE a ppt 关于艾滋病ppt课件精益管理ppt下载地图下载ppt可编辑假如ppt教学课件下载triz基础知识ppt wo.dbf 于"右边的浏览中选择考生文件夹，再输入文件名 运行该SQL语句，然后将此语句保存在myclasslib，单击"保存"按钮，然后单击"确定"按钮，文件中。 第2题:创建数据库可以使用"文件"菜单完成，apptwo.prg文件中。 打开"类设计器"窗口，进入类设计器环境，在属性窗--数据库--新建文件，在数据库设计三、 1( 2(将表order、goods和orderitem口中，将复选框的Value属性设置为1。 选择文件--新建器中添加goods表。再通过create VIEW命令打开视图添加到"订单管理"数据库; 选择文件--新建--表单--新建文件，弹出"表单设计器，在"添加表或视图"对话框中添加goods表; ?创建数据库可以使用"文件"菜单完成，选设计器"窗口。选中"工具"菜单下的"选项"命令，选在"字段"选项卡中选择商品号、商品名、单价和库存择文件--新建--数据库--新建文件，在数据库设计器择"控件"选项卡，再选择"可视类库"单选按钮，然后4个字段;切换到"筛选"选项卡，在其中进行如下orderitem表。 "按钮。在打开的对话框中，选择考生目录量中依次添加order、goods和单击"添加设置: ?通过create VIEW命令打开视图设计器，在"添下的类库文件myclasslib.vcx，单击"打开"按钮，将 字段名 条件 实例 逻辑 加表或视图"对话框中依次添加order、orderitem和类库文件myclasslib.vcx添加到可视类库中，然后单goods表，并设置三表间的联系;在"字段击"确定 Goods.单价 >= 2000 AND "选项卡中"按钮。再单击"表单控件"工具栏上的"查看 Goods.库存量 <= 2 OR 选择order.客户名、order.订单号、goods.图书名、类"按钮，然后选择myclasslib，在表单中添加一个 < 2000 AND 5个字段，再在"函数和 Goods.单价orderitem.数量、goods.单价MyCheckBox的控件，保存表单。 Goods.库存量 <= 4 表达式"下输入:goods.单价 * orderitem.数量 AS 三、 1(建立一个文件名和表单名均为formtest 切换到"排序依据"中选择字段"Goods.商品号"，金额。单击"添加"按钮。 的表单，表单中包括一个标签(Label1)、一个列表在"排序选项"处选择"升序"，最后将视图保存在 ?在命令窗口输入命令:CREATE FORM 框(List1)、一个表格(Grid1)。 viewone文件中。利用刚创建的视图viewone创建查orderform，打开表单设计器窗口，将表单的Name属 ?在命令窗口输入命令:CREATE FORM 询，建立查询可以使用"文件"菜单完成，选择文件--性修改为orderform。 formtest，打开表单设计器窗口。为表单添加数据库新建--查询--新建文件，在"添加表或视图"对话框中 ?在表单上添加表格、命令按钮，并进行适当的环境，在"显示"菜单下打开"数据环境"或在表单上点选择viewone视图，在字段中选择所有字段，设置查布置和大小调整。将表格的RecordSourceType属性设击右键打开"数据环境"。 询去向为表tabletwo。 置为"0-表"，命令按钮的Caption属性设置为"退出"。 ?在表单上添加标签、列表框、表格，并进行适三、 在考生文件夹下创建表单文件formtwo.scx， ?在表单的load当的布置和大小调整。 事件代码中输入: 如下图所示，其中包含一个标签、一个文本框和一个 select 客户名,图书名,金额 from orderview ?根据题面要求设置标签、列表框、表格以及表命令按钮。然后按相关要求完成相应操作。 where 数量单的属性值。 =1 ; (1)如图所示设置表单、标签和命令按钮的 order by 客户名,金额 desc into table ?设置"列表框"的DblClick事件代码: Caption属性。 result.dbf st="SELECT 职工号,姓名,课时 FROM 学院表, ?在命令窗口输入命令:CREATE FORM formtwo， ?在表格的activatecell事件代码中输入: 教师表 WHERE 学院表.系号=教师表.系号 AND ; 打开表单设计器窗口。 thisform.Grid1.recordsource="result.dbf" 学院表.系名=thisform.List1.Value INTO ?在表单上添加标签、文本框和命令按钮，并进 ?设置"退出"按钮的Click事件代码: TABLE two.dbf ORDER BY 教师表.职工号 DESC" 行适当的布置和大小调整。 THISFORM.RELEASE thisform.Grid1.RecordSource=st ?设置标签、命令按钮、表单的Caption属性值。 ?保存表单并运行 ?保存表单并运行，在列表框中双击"信息管理 ?将文本框的Value属性值设置为"=date()"。 一、 1(新建一个名为"学校"的数据库文件，"。 ?设置"查询"按钮的Click事件代码: 将自由表"教师表"、"职称表"和"学院表"添加到该数一、 1(在考生文件夹下"人事管理"数据库中， SELECT 签订日期,orders.订单号,姓名 as 客据库中。 2(在"学校"数据库文件中，为"职称表"建为"职工"表中的"性别"字段设置有效性规则，只能取户名,商品名,单价,数量 ; 立主索引，索引表达式为"职称级别"，索引名为 "男"或"女";默认值是"男"。 FROM goods INNER JOIN orderitems ; 1、建立数据库的常用方法有三种: 1、利用"文件"菜单下的"打开"命令打开数据库 INNER JOIN orders INNER JOIN customers; 在项目管理器中建立数据库; "人事管理"。再打开"职工"表的表设计器，选择"性 ON customers.客户号=Orders.客户号 ; 通过"新建"对话框建立数据库; 别"字段，在其字段有效性规则栏中输入:性别$"男 ON Orderitems.订单号=Orders.订单号 ; 使用命令交互建立数据库，命令为:CREATE 女"，在默认值栏中输入:"男"。 ON Goods.商品号=Orderitems.商品号 ; DATABASE [DatabaseName|?] 2、在"文件"菜单中选择"新建"，在"新建"对话 WHERE 签订日 2、将自由表添加到数据库中，可以在项目管理框中选择"菜单"，单击"新建文件"按钮，选择"快捷期>=ctod(thisform.Text1.Text) ; 器或数据库设计器中完成。打开数据库设计器，在"菜单"，在菜单设计器中输入三个菜单项"打开"、"关 ORDER BY 签订日期,orders.订单号,商品名 ; 数据库"菜单中或在数据库设计器上单击右键，在弹闭"和"退出"，单击"菜单"菜单中的"生成"，按提示 INTO TABLE tablethree.dbf 出的菜单中选择"添加表"，然后在"打开"对话框中选保存为cd，并生成菜单源程序文件(MPR)。 ?保存表单并运行，在文本框中输入择要添加到当前数据库中的自由表。 3、打开"职工"表的表设计器，打开"索引"选项01/10/2007，并单击"查询"命令按钮。 3、打开职称表的表设计器，打开"索引"选项卡，卡，在索引名处输入:部门编号，类型选择"普通索一、 1(新建一个不包含任何控件的空表单在索引名处输入:indexone，类型选择"主索引"，表引"，表达式为:部门编号，排序为"升序"。 myform.scx(表单名和表单文件名均为myform)。 达式为:职称级别。 4、在数据库设计器中，选中"部门"表中的索引" 2(打开表单文件formtwo.scx，将表单的标题设 4、启动报表向导可在"文件"菜单中选择"新建"部门编号"并拖动到"职工"表的"部门编号"的索引上为"计算机等级考试"。 或者单击工具栏上的"新建"按钮，打开"新建"对话并松开，这样两个表之间就建立起了永久联系。建立 1、单击工具栏上的"新建"按钮，再单击"框，文件类型选择"报表"，单击"向导"按钮。或者在好永久联系之后，在两处表的"部门编号"索引之间有表单"，单击"新建文件"，将表单的Name属性修改为"工具"菜单中选择"向导"子菜单，选择"报表"，或直一条线，单击这条表示两个表之间联系的线，线会加myform，单击"保存"按钮，将表单保存为myform.scx。 接单击工具栏上的"报表向导"图标按钮。然后按照向粗，此时在主菜单中选择"数据库"中的"编辑参照完 2、打开表单formtwo.scx，将表单的Caption属导提示操作即可。 整性(I)"，系统弹出"参照完整性生成器"对话框，在性修改为"计算机等级考试"。 5、打开test.prg程序，将其中的SQL语句修改为: "更新规则"标签中，选择"限制"规则，在"删除规则" 3、打开表单formthree.scx，选择"显示"菜单下 select 职称级别,基本工资 from 职称表 中选择"级联"，在"插入规则"中选择"限制"，单击"的"布局工具栏"子菜单，将布局工具栏显示出来。选where 职称名="教授" into dbf prof.dbf order by 确定"保存所编辑的参照完整性。 中表单上的4个命令按钮，单击布局工具栏上的"顶边基本工资 二、 1(编写程序文件prgone.prg，其功能是从"对齐"按钮。 最后保存并运行该程序。 人事管理"数据库的相关表中查询销售部从1985年到 4、打开表单formfour.scx，将表单的AutoCenter二、 1(请修改并执行程序temp.prg，该程1989年这5年出生的所有职工的信息，并存到表 属性值设置为".T.-真"。 序的功能是:根据"教师表"和"职称表"计算每位教师 第1题:在Visual FoxPro主窗口中按下组合键二、 1(使用查询设计器设计完成:查询"吴"姓的"应发工资"，每位教师的"应发工资"等于:与"职 Ctrl+N，系统弹出"新建"对话框，在文件类型中选择读者(客户名第一个字为"吴")订购图书情况，查询 第1题:本题是一个程序修改题。修改后的程序"程序"，点击"新建文件"按钮，在弹出的代码编辑器第1题:建立查询可以使用"文件"菜单完成，选择文为: 窗口中输入以下代码: 件--新建--查询--新建文件，将order、orderitem和 create table 职称系数表 (职称名 c(6),职 SELECT 编号,姓名,出生日期,名称 AS 部门名goods表添加到查询中，并设置三表间的联系，从字称系数 f(10,2)) &&有错误 称 FROM 部门,职工 ; WHERE 部门.部门编号=职工.部门编号 AND 部框和两个命令按钮放置到表单上，分别设置标签 thisform.grid1.recordsource="DBFA" 门.名称="销售部" ; label1的Caption属性为"工程号"，命令按钮 4.在Command2按钮的Click事件中输入: AND YEAR(职工.出生日期)>=1985 AND YEAR(职Command1的Caption属性为"查询"，Command2的Thisform.release。 工.出生日期)<=1989 ; Caption属性为"退出"，表格的Name属性为"grid1"， 5.保存表单并运行，在文本框中输入林诗因，并 ORDER BY 出生日期,编号 INTO TABLE cyqk.dbf RecordSourceType属性为"0,表"。 单击"查询"命令按钮。 最后保存并运行该程序。 3.在Command1按钮的Click事件中输入: 第2题:建立类可以使用"文件"菜单完成，选择 select 零件名,颜色,重量 from 零件 inner 一 1(打开Ecommerce数据库，并将考生文件夹文件--新建--类--新建文件，在弹出的"新建类"对话join 供应; 下的自由表OrderItem添加到该数据库。 框中:在"类名"右边的文本框中输入:MyListBox， on 零件.零件号=供应.零件号 where 工程号 第1题:打开考生文件夹下的"Ecommerce"数在"派生于"右边的列表框中选择ListBox，在"存储于=alltrim(thisform.text1.value); 据库，打开数据库菜单选择"添加表(A)"，在弹出的""右边的浏览中选择考生文件夹，再输入文件名 order by 零件.零件名 into table pp.dbf 打开"对话框中，选定考生文件夹下的OrderItem表，Myclasslib，单击"保存"按钮，然后单击"确定"按钮， thisform.grid1.recordsource="pp" 再点击"确定"即可，这样表OrderItem就添加到了打开"类设计器"窗口，进入类设计器环境，在属性窗 4.在Command2按钮的Click事件中输入:"Ecommerce"数据库中。 口中，将新类的Height属性设置为120，Width属性设Thisform.release。 第2题:在数据库设计器中选中表OrderItem，在置为80。 5.保存表单并运行，在文本框中输入J4，并单击数据库菜单中选择"修改(Y)"，弹出表设计器，选择三、 为了对"人事管理"数据库中的数据进行查"查询"命令按钮。 表设计器界面中的"索引"标签，在索引名列中填入询，请设计一个用于查询部门职工的表单。该表单的一、 在考生文件夹下的数据库rate中完成下列操"PK"，在索引类型列中选择"主索引"，在索引表达式名称为formone，文件名为pform.scx，标题为"人员作1. 将自由表rate_exchange和currency_sl添加到列中填入"会员号+商品号"，用同样的方法再为查询"，其界面如下图所示: rate数据库中。 OrderItem创建两个普通索引(升序)，一个的索引 ?在命令窗口输入命令:CREATE FORM 2. 为表rate_exchange建立一个主索引，为表cu 名和索引表达式均是"会员号";另一个的索引名和索pform，打开表单设计器窗口。?在表单上添加标签、第一步:打开考生文件夹下的"rate"数据库。 引表达式均是"商品号"，点击"确定"按钮，保存表结文本框、命令按钮、表格，并进行适当的布置和大小第二步:打开数据库菜单选择"添加表(A)"，在构。 调整。?根据题面要求设置标签、文本框、命令按钮、弹出的"打开"对话框中，选定考生文件夹下 第3题:在数据库设计器中，选中customer表中表格以及表单的属性值。 ?将表格Gridone的"即可，这样表rate_exchange表，再点击"确定的索引"会员号"并拖动到表OrderItem的"会员号"的RecordSourceType属性值设置为"4-SQL说明"。?设rate_exchange就添加到了"rate"数据库中，用索引上并松开，这样两个表之间就建立起了永久联置"查询"按钮的Click事件代码: 同样的方法，将currency_sl表也添加到"rate"系。 st="SELECT 姓名,性别,出生日期,编号 FROM 数据库中。 第4题:在第3题建立好永久联系之后，在两处表 WHERE 职工.部门编号=部门.部门编号 第三步:在数据库设计器中选中表职工,部门的"会员号"索引之间有一条线，单击这条表示两个表AND ; rate_exchange，在主菜单中选择"修改(Y)"，弹之间联系的线，线会加粗，此时在主菜单中选择"数 部门.名称=thisform.Textone.Text INTO TABLE 出表设计器，选择表设计器"索引"标签，在索引据库"中的"编辑参照完整性(I)"，系统弹出"参照完tableone.dbf ORDER BY 职工.编号" 名列中填入"外币代码"，在索引类型列中选择"整性生成器"对话框，在"更新规则"标签中，选择"级 thisform.Gridone.RecordSource=st 主索引"，在索引表达式列中填入"外币代码"，联"规则，在"删除"规则中选择"限制"，在"插入规则"按钮的Click事件代码: "确定"按钮，保存表结构，用类似的方法，"中选择"限制"，单击"确定"保存所编辑的参照完整 ?设置"退出点击 THISFORM.RELEASE 为currency_sl表建立普通索引。 性。 ?保存表单并运行，在文本框中输入"开发部"，第四步:在表设计器中首先选中要定义有效性规二、 1(建立查询qq，查询会员的会员号(来单击"查询"命令按钮进行查询。最后，单击"退出"命则的字段"持有数量"，在"规则"一栏中输入"持自Customer表)、姓名(来自Customer表)、会员所令按钮。 有数量<>0"(或用表达式生成器生成)，在"信购买的商品名(来自article表)、单价(来自 一、 1. 新建一个名为"供应"的项目文件。 息"栏中输入:"持有数量不能为0"。 第1题:建立查询可以使用"文件"菜单完成， 2. 将数据库"供应零件"加入到新建的"供应"项 第五步:打开考生文件夹下的"test_form"表单，选择文件--新建--查询--新建文件，将"Customer"目文件中。 右击"登录表，"article"表，"OrderItem"表添加到查询设计器"命令按钮，选择"属性(P)"，在弹出的"属 1.选择"文件"菜单中的"新建"，在类型选择框中性"对话框中将"登录"命令按钮的"Enable"值置中(将"article"表和"OrderItem"表通过"商品号"字选择"项目为段建立关联，将"Customer"表和"，单击新建文件按钮，输入项目名:"供.T.，接着保存表单即可。 "OrderItem"表通过"应2.在项目管理器中选择"数据"节点下的"数据库"，二、 1. 用SQL语句完成下列操作:列出"林诗会员号"字段建立关联)，在"字段"选项卡选择题面单击"添加因中要求的会员号、姓名、商品名、单价、数量字段，"按钮并选择"供应零件"数据库 "持有的所有外币名称(取自rate_exchange表)和 3.首先要为两个表建立索引，并且父表必须为主持有数量(取自currency_sl表)，并将检索结果按 金额需要通过计算得到，在函数和表达式处输入"OrderItem.单价索引或候选索引。具体方法是:在项目管理器中选择第1题，本题的主要考核点是SQL语句的查询。 * OrderItem.数量 as 金额"，单"供应零件"数据库，单击"修改"按钮，打开数据库设SELECT Rate_exchange.外币名称, Currency_sl.击"添加"按钮;单击查询菜单下的查询去向，选择表，计器，在数据库设计器中选中"零件输入表名ss，最后将查询保存在qq.qpr文件中，并运"表，单击数据库持有数量; 菜单中的修改，在表设计器中的索引选项卡中建立索 FROM currency_sl INNER JOIN 行该查询。 引，索引名为"零件号"，索引表达式为"零件号"，索rate_exchange ; 第2题:SQL命令为:SELECT 会员号,姓名,年龄 引类型为主索引，保存修改。用同样的方法为"供应" ON Currency_sl.外币代码 = FROM Customer WHERE 年龄<=30 order by 年龄 DESC 表建立索引，索引名为"零件号"，索引表达式为"零Rate_exchange.外币代码; TO FILE cut_ab.txt，然后将此命令保存在件号"，索引类型为"普通索引"。建立永久联系的方 WHERE Currency_sl.姓名 = "林诗因"; cmd_ab.prg文件中。 法是:在数据库设计器中单击"零件"表中的索引"零 ORDER BY Currency_sl.持有数量; 三、 设计一个名称为myform的表单(文件名和件号"，按住鼠标左键拖动到"供应"表中的相应索引 INTO TABLE rate_temp.dbf 表单名均为myform)，其中有一个标签Lable1(日期)、上即可。 第2题，本题的主要考核点是使用报表向导制作一个文本框Text1和两个命令按钮command1("查询") 4.打开"供应"表的表设计器，先在列表框中选中报表。 和command2("退出")，如下图所示: "数量"字段，然后在字段有效性规则区域中的规则文启动报表向导可在"文件"菜单中选择"新建"或 最后运行表单，在文本框中输入2003/03/08，并本框中输入:数量>0.and.数量<9999(也可以用表达者单击工具栏上的"新建"按钮，打开"新建"对话单击"查询"命令按钮。 式构造器生成)，在信息文本框中输入:"数量超范框，文件类型选择报表，单击向导按钮。或者在 本题主要考核点:表单文件的创建、控件的属性围"(双引号不可少) "工具"菜单中选择"向导"子菜单，选择"报表"，的修改、SQL语句运用、表单的退出。 二、 1. 用SQL语句完成下列操作:列出所有或直接单击工具栏上的"报表向导"图标按钮。然 解题思路: 与"红"颜色零件相关的信息(供应商号，工程号和数后按照向导提示操作即可。 ?在命令窗口输入命令:CREATE FORM myform，量)，并将检索结果按数量降序排序存放于表三、 设计一个表单名和文件名均为打开表单设计器窗口。 sup_temp中。 currency_form的表单，所有控件的属性必须在表单 ?在表单上添加标签、文本框和命令按钮，并进 1.在"零件"表中得到所有颜色为"红"的零件号，设计器的属性窗口中设置。表单的标题为:"外币市行适当的布置和大小调整。 然后在"供应"表中获得与此零件号相关的零件信息 值情况"。 1.选择"文件"菜单中"新建"命令，在 ?设置标签、"退出"命令按钮、表单的Caption select 供应商号,工程号,数量 from 供应; 文件类型选择框中选择"表单"，单击"新建文件"按属性值以及表单的Name属性值。将"查询"命令按钮的 where 零件号 iN (select 零件号 from 零件 钮。 Caption属性值设置为"查询(\=ctod(thisform.Text1.Text); 码窗口，在对象中选择form1，在过程中选择 select 外币名称,现钞买入价*持有数量 as 人 ORDER BY 3 GROUP BY Customer.会员号; RightClick，输入代码:do m_quick.mpr，保存表单。 民币数量; INTO TABLE dbfa.dbf 三、 设计名为mysupply的表单(表单的控件名和 from currency_sl inner join rate_exchange; ?设置"退出"按钮的Click事件代码: 1.选择"文件"菜单中"新建"命令，在文件类 on currency_sl.外币代码=rate_exchange.外币 THISFORM.RELEASE 型选择框中选择"表单"，单击"新建文件"按钮。 代码; ?保存表单并运行，在文本框中输入 2.在表单设计器中设置表单的Name属性为 where currency_sl.姓名03/08/2003，并单击"查询"命令按钮。 "mysupply"，Caption属性为"零件供应情况"，从控=alltrim(thisform.text1.value); 件工具栏中分别选择一个表格、一个标签、一个文本 order by 人民币数量 desc into table DBFA