计算机二级答案.doc

1、 第 1 套 基本操作：用命令新建一个名为 “外汇 “的数据库，并将该命令存储于 one.txt 中。 1.1 create database 外汇（要保存到 one.txt 中） 1.3 create table rate (币种 1 代码 c(2),币种 2 代码 c(2),买入价 n(8,4),卖出价 n(8,4)(要保存到 two.txt 中 ) 1.4 选中编辑框控件属性： scrollbars 为 0-无 2.1 新建程序 three.prg输入： 3 双击 “查询 “按钮输入： thisform.grid1.recordsource=“select * from 外汇账户 whe

2、re 钞汇标志 =“+iif(thisform.myOption.value=1, “现汇 “,“现钞“)+“ into cursor lsb“ 双击 “退出 “按钮输入： thisform.release 第 2 套 基本操作：打开数据库 “外汇 “，通过 “外币代码 “字段为 “外汇代码 “和 “外汇账户 “建立永久联系。 1.3 打开菜单在菜单名称 “查找 “输入：查询 =15000 order by 总金额 asc(要保存到 cmd_cb.txt 中 ) 3.1 添加一个表格 Grid1，在其“属性”的 Name 处输入“ Grdorders”，在 RecordSourceType 处

3、选择“ 4 SQL 说明”。 双击 “DO“按钮输入： zgh=ALLTRIM(ThisForm.Text1.Value) If Used(“employee“) SELECT employee ELSE USE employee ENDIF LOCATE FOR 职工号 =zgh ThisForm.Text2.Value=姓名 ThisForm.Text3.Value=性别 ThisForm.Grdorders.RecordSource=“SELECT * FROM orders WHERE 职工号 =“+zgh+“ INTO CURSOR LSB“ 双击 “close“按钮输入： this

4、form.release 第 6 套 基本操作：建立数据库 orders_manage,将自由表 employee 和 orders 添加到 新建的数据库中。 1.4 select 职工号 ,姓名 ,性别 ,出生日期 from employee where 婚否 order by 出生日期 desc into table infor_da 2.1 新建快捷菜单：在 “时间 “菜单项的 “过程 “输入： myform_da.caption=time() 在 “日期 “菜单项的 “过程 “输入： myform_da.caption=dtoc(date() 双击表单：在 “过程 “的 Rigtcli

5、ck 输入： do scmenu_d.mpr 2.2 select top 3 职工号 ,姓名 ,出生日期 from worker order by 出生日期 into table infor_db 3.3 双击 “确定 “按钮输入： IF thisform.optiongroup1.option1.value=1 IF thisform.check1.value=1 SELECT * FROM employee INTO TABLE temp ELSE SELECT * FROM employee ENDIF ELSE IF thisform.check1.value=2 SELECT *

6、FROM orders INTO TABLE temp ELSE SELECT * FROM orders ENDIF ENDIF 双击 “退出 “按钮输入： thisform.release 第 7 套 基本操作：创建一个新的项目 “客户管理 “。 2.1 use order_list append from order_list1 select order_list.客户号 ,客户名 ,订单号 ,总金 额 from order_list,customer where order_list.客户号 =customer.客户号 order by 总金额 desc into table resu

7、lts 2.2 1. 打开并修改表单文件 MODIFY FORM form1 2. 首先查看 “基准按钮 ”的 Left值（ 24），接着按 Shift键不放，依次选定其他命令按钮，在 “属性 ”对话框的 “Left”值处输入 “24”。 3. 添加一个表格控件，控件名仍为系统给定的名称，在 “属性 ”对话框的 “RecordSourceType”选择 “0 - 表 ”，在 “RecordSource”处输入 “customer” 3 新建程序 prog1.prg输入： close database use order_list select 订单号 ,sum(单价 *数量 ) as aa f

8、rom order_detail group by 订单号 order by 订单号 into cursor ff sele order_list do while !eof() sele ff locate for 订单号 =order_list.订单号 sele order_list repl 总金额 with ff.aa skip enddo select * from order_list order by 总金额 desc into dbf od_new 第 8 套 基本操作：打开 “订货管理 “数据库，并将表 order_list 添加到该数据库中。 2.1 use order_d

9、etail append from order_detail1 select order_list.订单号 ,订购日期 ,器件号 ,器件名 ,总金额 from order_list,order_detail where order_list.订单号 =order_detail.订单号 order by order_list.订单号 ,总金额 desc into table results 2.2 修改程序： 第 1 处： UPDATE order_detail1 SET 单价 =单价 + 5 第 2 处： SELECT 器件号 ,AVG(单价 ) AS 平均价 FROM order_detai

10、l1 group BY 器件号 INTO CURSOR lsb 第 3 处： SELECT * FROM lsb where 平均价 aa select order_list scatt to mm select tmp append blank gath from mm replace 总金额 with ff.aa endif select order_list skip enddo select * from tmp order by 总金额 into dbf od_mod 第 9 套 基本操作：打开 “订货管理 “数据库，并将表 order_list 添加到该数据库中。 2.1 USE

11、customer APPEND FROM customer1 select distinct customer.* from customer,order_list where customer.客户号 =order_list.客户号 order by customer.客户号 into table results 2.2.1 修改表单：双击 “确定 “按钮： 第 1 处： if thisform.text1.value = thisform.text2.value 第 2 处： thisform.release 2.2.2 单击 “text2“文本框，属性 passwordchar 输入 *

12、 3.1. 在命令窗口输入建立报表的命令 CREATE REPORT report1 2. 在 “报表设计器 -report1.frx”中，单击鼠标右键，在弹出菜单中选择 “数据环境 ”菜单项，在 “数据环境设计器 -报表设计器 -report1.frx”窗口中，再单击鼠标右键，在弹出菜单中选择 “添加 ”菜单项，在 “打开 ”对话框中，选择表 “order_list”，单击 “确定 ”按钮，再关闭 “添加表或视图 ”对话框，接着选定表“order_list”，单击鼠标右键，在弹出菜单中选择 “属性 ”菜单项，在 “属性 ”窗口的 Order处选择 “客户号 ”。 3. 单击 “报表 标题 /

13、总结 ”菜单项， 接着显示 “标题 /总结 ”对话框，在对话框的 “报表标题 ”处选中 “标题带区 ”，在 “报表总结 ”处选中 “总结带区 ”，选完这两项后，单击 “确定 ”按钮。 4. 单击 “报表 数据分组 ”菜单项，在 “数据分组 ”对话框中，单击 “.”按钮，接着显示 “表达式生成器 ”对话框，在此对话框中双击 “order_list.客户号 ”项，并在 “按表达式分组记录 :”处生成 “order_list.客户号 ”，再单击 “确定 ”按钮，返回到 “数据分组 ”对话框中，于是单击 “确定 ”按钮。 5. 在 “数据环境设计器 ”中，选定字段 “定 单号 ”并按住不放，接着移动鼠

14、标至 “细节 ”带区，松开鼠标，按同样方法来处理字段 “订购日期 ”和 “总金额 ”，接着移动 “细节 ”带区来调整位置。 6. 在 “数据环境设计器 ”中，选定字段 “客户号 ”并按住不放，接着移动鼠标至 “组标头 1:客户号 ”带区，松开鼠标。 7. 在 “页标头 ”带区增加一个标签 “客户号 ”。 8. 在 “数据环境设计器 ”中，选定字段 “总金额 ”并按住不放，接着移动鼠标至 “组注脚 1:客户号 ”带区，松开鼠标，接着在 “组注脚 1:客户号 ”带区选定中 “总金额 ”并单击鼠标右键，在弹出菜单中选择 “属 性 ”菜单项，在 “报表表达式 ”对话框中单击 “计算 ”按钮，在 “计算

15、字段 ”对话框中，选定 “求和 ”单选钮，再单击 “确定 ”按钮返回到 “报表表达式 ”对话框中，接着再按 “确定 ”返回到 “报表设计器 -report1.frx”窗口中。 9. 在 “标题 ”带区增加一个标签 “订单分组汇总表（按客户） ”，再选定这个标签，单击 “格式 字体 ”菜单项，接着选择 “黑体 ”和 “三号 ”，最后按 “确定 ”按钮。 10. 在 “数据环境设计器 ”中，选定字段 “总金额 ”并按住不放，接着移动鼠标至 “总结 ”带区，松开鼠标，接着在 “总结 ”带区选定中 “总金额 ”并单击鼠标右键，在弹出菜单中选择 “属性 ”菜单项，在 “报表表达式 ”对话框中单击 “计算

16、 ”按钮，在 “计算字段 ”对话框中，选定 “求和 ”单选钮，再单击 “确定 ”按钮返回到 “报表表达式 ”对话框中，接着再按 “确定 ”返回到 “报表设计器 -report1.frx”设计窗口中。 第 10 套 基本操作：将 order_detail、 order_list 和 customer 表添加到数据库。 2.1 select order_detail.* from order_list,order_detail where order_list.订单号 =order_detail.订单号 and 客户号 =“C10001“ order by order_detail.订单号 ,单价

17、 desc into table results 2.2.1 thisform.caption=“简单应用 “ 2.2.2 thisform.grid1.recordsource=“order_list.dbf“ 2.2.3 thisform.release 1. 增加新字段 : ALTER TABLE order_detail ADD COLUMN 新单价 F(10,2) 2. 在 prog1.prg文件中的内容是： UPDATE order_detail SET 新单价 =单价 *0.9 WHERE 订单号 =(SELECT 订单号 FROM order_list WHERE 订单号 =o

18、rder_detail.订单号 AND YEAR(订购日期 )=2001) UPDATE order_detail SET 新单价 =单价 *1.1 WHERE 订单号 =(SELECT 订单号 FROM order_list where 订单号 =order_detail.订单号 AND YEAR(订购日期 )=2002) 3. 建立 “快速报表 ” (1). 单击 “工具 向导 报表 ”菜单项，并显示 “向导选取 ”对话框。 (2). 在 “向导选取 ”对话框中，选择 “报表向导 ”并单击 “确定 ”按钮，并显示 “报表向导 ”对话框。 (3). 在 “报表向导 ”对话框的 “步骤 1-字

19、段选取 ”中，首先要选取表 “order_detail”，在 “数据库和表 ”列表框中，选择表 “order_detail”，接着在 “可用字段 ”列表框中显示表 order_detail的所有字段名， 并选取指定的字段名至 “选定字段 ”列表框中，单击 “完成 ”按钮。 (4). 在 “报表向导 ”对话框的 “步骤 6-完成 ”中，单击 “完成 ”按钮，在 “另存为 ”对话框的 “保存报表为 ”中输入报表名 “report1”，最后单击 “保存 ”按钮即可。 3. 增加新字段： alter table order_detail add column 新单价 f(10,2) 新建程序 prog

20、1.prg输入 : UPDATE order_detail SET 新单价 =单价 *0.9 WHERE 订单号 =(SELECT 订单号 FROM order_list WHERE 订单号 =order_detail.订单号 AND YEAR(订购日期 )=2001) UPDATE order_detail SET 新单价 =单价 *1.1 WHERE 订单号 =(SELECT 订单号 FROM order_list where 订单号 =order_detail.订单号 AND YEAR(订购日期 )=2002) 第 11 套 基本操作：打开 “订货管理 “数据库，并将表 order_de

21、tail 添加到该数据库中。 2.1 SELECT * FROM order_list WHERE 总金额 (SELECT AVG(总金额 ) FROM order_list) ORDER BY 客户号 INTO TABLE results 1. 在命令窗口输入建立报表命令 CREATE REPORT report1 2. 单击 “报表 快速报表 ”菜单项，在 “打开 ”对话框中选择表 “order_detail”并单击 “确定 ”按钮。 3. 在 “快速报表 ”对话框中，单击 “确定 ”按钮，在 “报表设计器 -report1.frx”窗口中，单击 “报表 标题/总结 ”菜单项，接着 显示

22、“标题 /总结 ”对话框，在对话框的 “报表标题 ”处选中 “标题带区 ”，单击 “确定 ”按钮。 4. 在 “标题 ”带区增加一个标签 “器件清单 ”。 5. 在 “页注脚 ”带区选定中 “DATE()”并单击鼠标右键，在弹出菜单中选择 “属性 ”菜单项，并显示 “报表表达式 ”对话框，然后单击 “表达式 ”文本框右边的 “.”按钮，从 “日期 ”列表框中选择 “TIME()”，单击 “确定 ”按钮，返回到 “报表表达式 ”对话框中，再单击 “确定 ”按钮即可。 6. 关闭保存该报表。 3.1 新建程序 prog1.prg输入： SET SAFETY OFF SELECT * FROM or

23、der_detail INTO DBF od_bak SELECT od_bak REPLACE ALL 订单号 WITH RIGHT(ALLTRIM(订单号 ),1) SELECT 订单号 ,器件号 ,器件名 ,MIN(单价 ) AS 单价 ,SUM(数量 ) AS 数量 FROM od_bak GROUP BY 订单号 ,器件号 ,器件名 ORDER BY 订单号 ,器件号 INTO DBF od_new BROWSE CLOSE DATABASE 第 12 套 基本操作：创建一个新的项目 sdb_p,并在该项目中创建数据库 sdb。 2.1 select student.学号 ,姓名 ,

24、课程名 ,成绩 from student,course,sc where student.学号 =sc.学号 and sc.课程号 =course.课程号 order by 课程名 ,成绩 desc into table sclist 3.1 新建程序 T1.prg输入： OPEN DATABASE sdb CREATE VIEW sview AS ; SELECT STUDENT.学号 , 姓名 , AVG(成绩 ) 平均成绩 , MIN(成绩 ) 最低分 , COUNT(*) 选课门数 ; FROM STUDENT, SC; WHERE STUDENT.学号 = SC.学号 ; GROUP

25、 BY STUDENT.学号 HAVING COUNT(*) 3; ORDER BY 平均成绩 DESC CLOSE ALL （要新建报表） 3.2 双击 “浏览 “按钮输入： Command1.Click”编辑窗口中输入“ SELECT * FROM sview 双击 “打印 “按钮输入： REPORT FORM p_student 第 13 套 基本操作：在数据库 salary_db 中建立表 dept,表结构如下： 2 修改表单： 2.2.1 单击“刘缆雇员工资”命令按钮，在“属性”的 Caption 处输入“浏览雇员工资” 2.2.2 SELECT * FORM salarys 2.2

26、.3 release thisform 3.1 新建程序 change_c 输入： select * from salarys into table bak_salarys select 3 use c_salary1 order 雇员号 select salarys set relation to 雇员号 into c_salary1 replace all 工资 with c_salary1.工资 for 雇员号 = c_salary1.雇员号 set relation to 3.2 双击 “调整 “按钮输入 ： do change_c 双击 “退出 “按钮输入： thisform.rel

27、ease 第 14 套 基本操作：打开项目文件 salary_p,将考生文件夹下的数据库 salary_db 添加到该项目中。 2 .1. 在 T1.PRG文件中的内容是 OPEN DATABASE salary_db CREATE VIEW sview AS; SELECT 部门号 ,雇员号 ,姓名 ,工资 ,补贴 ,奖励 ,失业保险 ,医疗统筹 ,工资 +补贴 +奖励 -失业保险 -医疗统筹 AS 实发工资 ; FROM salarys; ORDER BY 部门号 DESC CLOSE ALL 2.2(1). 在命令窗口中输入建立表单命令 CREATE FORM form1 如果数据库 s

28、alary_db在没有被打开的情况下 (2). 在 “表单设计器 -form1.scx”中，单击鼠标右键，在弹出菜单中选择 “数据环境 ”菜单项，在 “打开 ”对话框中选中表 “salarys”并单击 “确定 ”按钮，接着关闭 “添加表或视图 ”对话框。 如果数据库 salary_db已经打开 (2). 在 “表单设计器 -form1.scx”中，单击鼠标右键，在弹出菜单中选择 “数据环境 ”菜单项，在 “添加表或视图 ”对话框中选中表 “salarys”并单击 “添加 ”按钮，接着单击 “关闭 ”按钮关闭此对话框。 (3). 在 “数据环境设计器 -form1.scx”中选定表 “salar

29、ys”并按住鼠标不放，拖至 “表单设计器 ”窗口中，释放鼠标，即可生成表格名称为 grdSalarys的表格。 (4). 在 “表单设计器 -form1.scx”的右下方添加一个命令按钮，在其 “属性 ”窗口 的 Caption处输入 “退出浏览 ”。 (5). 双击 “退出浏览 ”命令按钮，在 “Command1.Click”编辑窗口中输入 “Release Thisform”，接着关闭编辑窗口。 3. 双击 “生成 “按钮输入： open database salary_db do case case key = 1 FROM salarys,dept; WHERE salarys.部 门

30、号 = dept.部门号 ; GROUP BY salarys.部门号 into table hz1 endcase close all 双击 “退出 “按钮输入： thisform.release 第 15 套 基本操作：修改并执行 one.prg中的 SQL 语句， 1.1 把 to 改为 into 1.2 在 delete 后面加上 from 2.2.1 把标题改为 caption 2.2.2 do form sellcomm.scx 2.2.3 report form print1 preview 3.1 select * from 商品表 into table 商品表备份 Updat

31、e 商品表 set 单价 =出厂单价 *0.1 where left(商品号 ,2)=” 10” 第 16 套 1.1 方法一： 1. 打开并修改数据库 MODIFY DATABASE 雇员管理 2. 在 “数据库设计器 -雇员管理 ”中，选择表 “雇员 ”并单击鼠标右键，选择 “修改 ”命令项。 3. 在 “表设计器 -雇员 .dbf”中，在结构的最后处输入字段名为 “EMAIL”，然后选择类型为 “字符型 ”并输入宽度 20，最后单击 “确定 ”按钮即可。 方法二： 使用命令增加字段 ALTER TABLE 雇员 ADD COLUMN email C(20) 1.2 1. 在 “数据库设计

32、器 -雇员管理 ”中，选择表 “雇员 ”并单击鼠标右键，选择 “修改 ”命令项。 2. 在 “表设计器 -雇员 .dbf”中，选择 “性别 ”字段，在 “字段有效性 ”标签的 “规则 ”处输入 “性别 $“男女 “”，在 “默认值 ”处输入 “女 “”，最后单击 “确定 ”按钮即可。 1.4 在 “数据库设计器 -雇员管理 ”中，然后选择 “部门 ”表中主索引键 “部门号 ”并按住不放，然后移动鼠标拖到 “雇员 ”表中的索引键为 “部门号 ”处，松开鼠标即可。 基本操作：为“雇员”表增加一个字段名为 EMAIL、类型为“字符” 2.11 1. 打开并修改表单文件 MODIFY FORM for

33、m1 如果数据库 salary_db在没有被打开的情况下 (2). 在 “表单设计器 -form1.scx”中，单击鼠标右键，在弹出菜单中选择 “数据环境 ”菜单项，在 “打开 ”对话框中选中表 “雇员 ”并单击 “确定 ”按钮，接着关 闭 “添加表或视图 ”对话框。 如果数据库 salary_db已经打开 (2). 在 “表单设计器 -form1.scx”中，单击鼠标右键，在弹出菜单中选择 “数据环境 ”菜单项，在 “添加表或视图 ”对话框中选中表 “雇员 ”并单击 “添加 ”按钮，接着单击 “关闭 ”按钮关闭此对话框。 (3). 在 “属性 ”中选择 “Form1”，在 Caption处输

34、入 “XXX公司雇员信息维护 ”。 (4). 双击 “刷新日期 ”命令按钮，在 “Command1.Click”编辑窗口中把语句修改为 “UPDATE 雇员 SET 日期 = DATE()”，关闭编辑窗口。 2.1.2 单击表单属性 caption 输入： xxx 公司雇员信息维护 2.1.3 双击“刷新日期”命令按钮修改： update 雇员 with 日期 =date() 1.3 replace all email with 部门号 +雇员号 +” ” 3. 一、建立视图 1. 打开数据库 “雇员管理 ” OPEN DATABASE 雇员管理 2. 单击 “工具 向导 查询 ”菜单项，并显

35、示 “向导选取 ”对话框。 3. 在 “向 导选取 ”对话框中，选择 “本地视图向导 ”并单击 “确定 ”按钮，并显示 “本地视图向导 ”对话框。 4. 在 “本地视图向导 ”对话框的 “步骤 1-字段选取 ”中，首先要选取表 “雇员 ”，在 “数据库和表 ”列表框中，选择表 “雇员 ”，接着在 “可用字段 ”列表框中显示表 “雇员 ”的所有字段名，并选定指定的字段名添加到 “选定字段 ”列表框中；选择表 “部门 ”，接着在 “可用字段 ”列表框中显示表 “部门 ”的所有字段名，并选定指定的字段名添加到 “选定字段 ”列表框中，单击 “下一步 ”按钮。 5. 在 “本地视图向导 ”对话框的 “

36、步骤 2-为表建 立关系 ”中，单击 “添加 ”按钮，再单击 “完成 ”按钮。 5. 在 “本地视图向导 ”对话框的 “步骤 5-完成 ”中，单击 “完成 ”按钮。 6. 在 “视图名 ”对话框中，输入视图名 “view1”，再单击 “确认 ”按钮，这样视图就生成了。 二、设计表单 1. 在命令窗口中输入建立表单命令 CREATE FORM form2 2. 在 “表单设计器 ”中，在 “属性 ”的 Caption处输入 “商品销售数据输入 ”。 3. 在 “表单设计器 ”中，单击鼠标右键，在弹出菜单中选择 “数据环境 ”菜单项，在 “添加表或视图 ”对话框中先选中表 “部门 ”并单击 “添加

37、 ”按钮，接着再单击 “选定 ”框中 “视图 ”的按钮，并单击 “添加 ”按钮，最后接着单击 “关闭 ”按钮关闭 “添加表或视图 ”对话框。 4. 在 “表单控件 ”对话框中选定 “页框 ”控件，在 “表单设计器 ”中建立这个 “页框 ”，选中这个 “页框 ”并单击鼠标右键，在弹出菜单中选择 “编辑 ”菜单项，再单击 “Page1”，在其 “属性 ”的 Caption处输入 “部门 ”，接着在 “数据环境 ”中选中 “部门 ”表按住不放，再移动鼠标到 “页框 ”的 “部门 ”处，最后松开鼠标；单击 “Page2”，在其 “属性 ”的 Caption处输入 “雇员 ”，接着在 “数据环境 ”中选

38、中 “view1”视图按住不放，再移动鼠标到 “页框 ”的 “雇员 ”处，最后松开鼠标。 5. 在 “表单设计器 ”的右下角，添加一个命令按钮，在 “属性 ”窗口的 Caption处输入 “退出 ”，双击 “退出 ”命令按钮，在 “Command1.Click”编辑窗口中输入 “Release Thisform”，接着关闭编辑窗口。 第 17 套 基本操作：从数据库 stock 中移去 stock_fk(不是删除 ) 2.1 select 股票简称 ,现价 ,买入价 ,持有数量 from stock_name ,stock_sl where stock_name.股票代码 =stock_sl.

39、股票代码 and 现价 买入价 order by 持有数量 desc into table stock_temp 2.2 1. 单击 “工具 向导 报表 ”菜单项，并显示 “向导选取 ”对话框。 2. 在 “向导选取 ”对话框中，选择 “一对多报表向导 ”并单击 “确定 ”按钮，并显示 “一对多报表向导 ”对话框。 3. 在 “一对多报表向导 ”对话框的 “步骤 1-从父表选择字段 ”中，首先要选 取表 “stock_name”，在 “可用字段 ”列表框中显示表 stock_name的所有字段名，并选定 “股票简称 ”添加到 “选定字段 ”列表框中，单击 “下一步 ”按钮。 4. 在 “一对多

40、报表向导 ”对话框的 “步骤 2-从子表选择字段 ”中，选取表 “stock_sl”，在 “可用字段 ”列表框中显示表 stock_sl的所有字段名，并选定所有的字段添加到 “选定字段 ”列表框中，单击 “下一步 ”按钮。 5. 在 “一对多报表向导 ”对话框的 “步骤 3-为表建立关系 ”中，单击 “下一步 ”按钮。 6. 在 “一对多报表向导 ”对 话框的 “步骤 4-排序记录 ”中，选定 “股票代码 ”字段并选择 “升序 ”，再单击 “添加 ”按钮，单击 “完成 ”按钮。 7. 在 “一对多报表向导 ”对话框的 “步骤 6-完成 ”中，在 “报表标题 ”文本框中输入 “股票持有情况 ”，

41、单击“完成 ”。 8. 在 “另存为 ”对话框中，输入保存报表名 “stock_report”，再单击 “保存 ”按钮，最后报表就生成了。 3.3 1. 在命令窗口中输入建立表单命令 CREATE FORM mystock 2. 在 “表单设计器 -mystock.scx”中，在 “属性 ”的 Caption处输入 “股票持有情况 ”，在 Name处输入“mystock”。 3. 在 “表单设计器 -mystock.scx”中，添加两个文本框（ “Text1”和 “Text2”）。 4. 在 “表单设计器 -mystock.scx”中，添加两个命令按钮，单击第 1个命令按钮在 “属性 ”的 C

42、aption处输入 “查询 ”，单击第 2个命令按钮在 “属性 ”的 Caption处输入 “退出 ”。 5. 双击 “查询 ”命令按钮，在 “Command1.Click”编辑窗口中输入命令组，接着关闭编辑窗口。 pinyin= alltrim(thisform.text1.value) open database stock use stock_name locate for 汉语拼音 =pinyin if found() select 持有数量 ,股票简称 from stock_sl,stock_name ; where 汉语拼音 =pinyin and stock_sl.股票代码 =s

43、tock_name.股票代码 ; into array a thisform.text1.value=a2 thisform.text2.value=a1 else wait “没有查询到 ,请重输 “ window timeout 2 endif 6. 双击 “退出 ”命令按钮 ， 在 “Command2.Click”编辑窗口中输入 “Release Thisform”， 接着关闭编辑窗口。 3.1 查询 :select 持有数量 from stock_name,stock_sl where stock_name.股票代码 =stock_sl.股票代码 and 汉语拼音 like thisf

44、orm.text1.value into array a thisform.test2.value=str(a(1) select stock_sl.股票代码 ,（现价 -买入价） *持有数量 as 浮亏金额 from stock_name,stock_sl where stock_name.股票代码 =stock_sl.股票代码 and 汉语拼音 like thisform.text1.value into array b insert into stock_fk from array b 清空 :delete from stock_fk pack 退出 : thisform.release

45、 第 18 套 基本操作：新建一个名为“学生”的数据库 2.1 select 学生 .学号 ,姓名 ,avg(成绩 ) as 平均分 ,count(选课 .学号 ) as 选课门数 from 学生 ,选课 where 学生 .学号 =选课 .学号 group by 选课 .学号 having 选课门数 =5 order by 平均分 desc into table stu_temp 2.2 1. 单击 “文件 新建 ”命令项。 2. 在 “新建 ”对话框中选择 “菜单 ”单选钮，再按 “新建文件 ”按钮。 3. 在 “新建菜单 ”对话框中选择 “菜单 ”按钮，在菜单设计器中的 “菜单名称 ”中

46、输入 “查询 ”和 “退出 ”，然后 “查询 ”菜单的 “结果 ”中选择 “子菜单 ”，单击 “创建 ”按钮，在 “菜单设计器 ”中，输入两个子菜单项 “按姓名 ”和 “按学号 ”。 4. 在 “退出 ”子菜单的 “结果 ”选择 “命令 ”并输入命令 “set sysmenu to default”。 5. 单击工具栏上 “保存 ”按钮，在弹出 “保存 ”对话框中输入 “menu_lin”即可。 6. 在 “菜单设计器 ”窗口下，单击 “菜单 ”菜单栏，选择 “生成 ”菜单项，生成 “menu_lin.mpr”文件。 3. 1. 在命令窗口中输入建立表单命令 CREATE FORM mystu

47、 2. 在 “表单设计器 -mystu.scx”窗口中，在 “属性 ”的 Caption处输入 “学生学习情况统计 ”。 3. 在 “表单控件 ”中选定 “选项按钮组 ”控件，在其 “属性 ”的 Name处输入 “myOption”选中这个选项组并单击鼠标右键，在弹出菜单中选择 “编辑 ”菜单项，再单击 “Option1”，在其 “属性 ”的 Caption处输入 “升序 ”；单击 “Option2”，在其 “属性 ”的 Caption处输入 “降序 ”。 4. 在 “表单设计器 -mystu.scx”中，添加两个命令按钮，单击第 1个命令按钮在 “属性 ”的 Caption处输入“计算 ”，

48、单击第 2个命令按钮在 “属性 ”的 Caption处输入 “退出 ”。 5. 双击 “计算 ”命令按钮，在 “Command1.Click”编 辑窗口中输入命令组，接着关闭编辑窗口。 if thisform.myOption.value=1 select 学号 ,成绩 from 选课 ,课程 where 选课 .课程号 =课程 .课程号 and 课程名称 =“C语言 “ order by 成绩 into dbf stu_sort1 else select 学号 ,成绩 from 选课 ,课程 where 选课 .课程号 =课程 .课程号 and 课程名称 =“C语言 “ order by 成绩 desc into dbf stu_sort2 endif 6. 双击 “退出 ”命令按钮，在 “Command2.Click”编辑窗口中输入 “Release Thisform”，接着关闭编辑窗口。 3.1 计算 :if thisform.myoption.buttons(1).value=1 select 学生 .学号 ,成绩 from 学生 ,选课 ,课程 where 课程名称 =“C 语言 “ and 学生 .学号 =选课 .学号 and 选课 .课程号 =课程 .课程号 order by 成绩 into table stu_so