vf125每套图的精华考试必备文档格式.docx

1、零件信息 INNER JOIN 使用零件情况!使用零件; INNER JOIN 使用零件情况!项目信息 ; ON 使用零件.项目号 = 项目信息.项目号 ; ON 零件信息.零件号 = 使用零件.零件号; ORDER BY 项目信息.项目号 DESC, 零件信息.零件号; INTO TABLE item_temp.dbf设计一个表单名和文件名均为foem_item的表单 S1 S2 S3双击表单空白处，在表单的Init事件中输入如下代码： Public a（3） A（1） = s1 A（2） = s2 A（3） = s3统计按钮的Click事件代码如下：x=allt（bo1.value）SEL

2、ECT SUM（使用零件.数量*零件信息.单价） as je;使用零件 INNER JOIN 使用零件情况!零件信息 ; ON 使用零件.零件号 = 零件信息.零件号; WHERE 使用零件.项目号 = x into array bthisform.text1.value=allt（str（b1）退出thisform.release第四套有表单文件formonescx 只读组合框的Style属性为2-下拉列表框、RowSourceType属性为6-字段、RowSource属性为employee.姓名；设置文本框Text1的ReadOnly属性为.T.-真。步骤3：双击组合框，在代码编辑器中将语

3、句Text1.Value=m2改为ThisForm.Text1.Value=m2创建一个名为mymenu的下拉菜单 帮助子菜单之前插入一个考试子菜单选择行，单击该行中的创建按钮，在弹出的窗口中输入如下代码：SELECT Employee.组别, Employee.姓名 AS 负责人,sum（orders.金额） as 合计; FROM employee,orders ;WHERE Employee.职员号 = Orders.职员号;AND Employee.职务 = 组长 GROUP BY Employee.组别; ORDER BY 3 DESC; INTO TABLE tabletwo.db

4、f步骤4：返回行，单击该行中的SET SYSMENU TO DEFAULT第五套 田亮 和 顶层SELECT Book.书名, Book.作者, Book.价格;FROM book,loans,borrows ;WHERE Loans.借书证号 = Borrows.借书证号 ;AND Book.图书登记号 = Loans.图书登记号;AND Borrows.姓名 = 田亮ORDER BY Book.价格 DESC;INTO TABLE book_temp.dbf选在显示菜单下的常规选项命令，在对话框中选择顶层表单复选框。在命令窗口输入命令create form form_menu，新建表单fo

5、rm_menu，设置表单的ShowWindow属性为2作为顶层表单 步骤3：双击表单空白处，打开代码编辑窗口，选择表单对象的Init事件，输入以下代码： DO menu_lin.mpr With This,abc 再选择表单对象的Destroy事件，输入以下代码： Release Menu abc Extended清华 北航 科学组合框的RowSourceType属性为 1-值、Style属性为2-下拉式列表框清华,北航,科学，SELECT COUNT（*） FROM BOOK;WHERE 出版社=THISFORM.COMBO1.VALUE;INTO ARRAY TEMPTHISFORM.TE

6、XT1.VALUE=TEMP（1）第六套P7 pn7 1020INSERT INTO 零件信息 VALUES（p7,PN7,1020） DELE FROM 零件信息 WHERE 单价=1修改并执行程序temp将 TO 改为 INTO。将 OPEN 改为 USE。将 SCAN OF 改为 SCAN FOR。错误4：将 OR 改为 AND。错误5：将 sum+1 改为 sum=sum+1。大于等于 小于 3000 4000 5000：双击表单空白处，编写表单的load事件代码：*表单的load事件代码*public a（3）a（1）=3000a（2）=4000a（3）=5000双击命令按钮，分别编

7、写生成和按钮的Click事件代码。按钮的Click事件代码*x=val（bo1.value）if thisform.optiongroup1.value = 1 sele * from 教师表 where 工资 = x order by 工资 desc,姓名 into table salaryelse sele * from 教师表 where 工资 4500; ORDER BY 教师表.职工号; TO FILE one.txt修改four程序 学院表 教师表 信息管理第一处：WHILE改为WHERE。第二处：OPEN改为USE。第三处：WHERE改为FOR。第四处：填入num = num +

8、1。Oneform表单文件 平均工资 总工资x = bo1.valueSELECT 学院表.系名, 学院表.系号, avg（教师表.工资） as 平均工资;FROM college!学院表 INNER JOIN college!教师表 ;ON 学院表.系号 = 教师表.系号;WHERE 学院表.系名 = x;GROUP BY 学院表.系号;INTO TABLE salary.dbfSELECT 学院表.系名, 学院表.系号, sum（教师表.工资） as 总工资;Endif第十三套林诗音持有的所有外币名称*rate.txt文件中的代码*SELECT Rate_exchange.外币名称, Cu

9、rrency_sl.持有数量;FROM currency_sl,rate_exchange ;WHERE Currency_sl.外币代码 = Rate_exchange.外币代码;AND Currency_sl.姓名 = 林诗因ORDER BY Currency_sl.持有数量;INTO TABLE rate_temp.dbf陆小平 currency_form*查询按钮的Click事件代码*select 外币名称,现钞买入价*持有数量 as 人民币数量;from rate_exchange,currency_sl;where rate_exchange.外币代码 = currency_sl.

10、外币代码 and currency_sl.姓名 = thisform.text1.value;order by 人民币数量 desc;into dbf dbfathisform.grid1.recordsource = dbfa第十四套宾馆 数据库（4）单击工具栏中的新建按钮，建立一个程序文件，输入如下代码： SELECT 客户号,身份证,姓名,工作单位 FROM 客户 WHERE 性别=男 INTO TABLE TABA.DBF修改宾馆数据库第3行改为：FROM 客户,入住 WHERE 客户.客户号 = 入住.客户号;第5行改为：（ SELECT 入住日期;第7行改为：WHERE 客户.客户

11、号 = 入住.客户号 AND 姓名 = 姚小敏）;第8行改为：INTO TABLE TABC按钮，为命令按钮的Click事件编写程序代码：打开数据库宾馆SET CENTURY ONSET DATE TO YMDSELECT 客户.客户号, 客户.身份证, 客户.姓名, 客户.工作单位, 客房.客房号, 房价.类型名, 房价.价格; FROM 客户,房价,入住,客房; WHERE 客户.客户号 = 入住.客户号; AND 客房.客房号 = 入住.客房号; AND 房价.类型号 = 客房.类型号; AND 入住.退房日期=ctod（ThisForm.Text1.value）; ORDER BY 房

12、价.价格 DESC; INTO TABLE tabd第十五套表单one 两个图ThisForm.Text1.Value=year（date（）表单菜单中选择新建方法程序命令，新建一个名为test的方法，在属性窗口中双击此方法，在弹出的窗口中编写用户自定义过程代码： ThisForm.Command1.Enabled=.f.在表单设计器环境下双击测试命令按钮，编写Click事件代码： ThisForm.Test。在命令窗口输入命令： alter table 教师表 alter 职工号 set check LEFT（职工号,3）=110课程管理数据库建立视图salaryCREATE sql VIE

13、W salary AS SELECT 教师表.系号, AVG（教师表.工资） AS 平均工资 FROM 教师表;GROUP BY 教师表.系号 ORDER BY 2 DESC步骤2：修改程序中的错误如下。将WHILEDO WHILENEXTSKIPCASEIF生成表 生成表命令按钮编写Click事件代码：*a=ThisForm.Check1.Value b=ThisForm.Check2.Value c=ThisForm.Optiongroup1.Option1.Value d=ThisForm.Optiongroup1.Option2.Value if a=1 and b=1 if c=1

14、select 职工号,姓名,系名,工资,课程号 from 教师表,学院表; where 教师表.系号=学院表.系号; order by 职工号; into table two.dbf else if d=1 order by 职工号 desc; endif endif if a=1 and b=0 select 职工号,姓名,系名,课程号 from 教师表,学院表; into table one_x.dbf if a=0 and b=1 select 职工号,姓名,工资,课程号 from 教师表,学院表; into table one_xx.dbf 第十六套表单one 移动顺序 关闭 到 退出

15、（1） 单击工具栏中的打开按钮，打开考生文件夹下的表单one， 设置Command1的TabIndex 属性为1，Command2的TabIndex属性2，Command3的 TabIndex属性为3。（2）单击工具栏中的按钮，打开考生文件夹下的表单two，按下SHIFT键的同时选中3个命令按钮控件，通过布局工具栏设置其对齐方式为顶边对齐（3）单击工具栏中的按钮，新建一个程序文件，输入下列命令： Create table 分组情况表（组号 c（2）,组名 c（10）将该程序保存为three.prg并运行。（4）方法同上建立程序four.prg，输入命令： INSERT INTO 分组情况表 VALUES（01通俗唱法歌手比赛分为4个组第1处：第2处：歌手表.歌手编