第34套
一、
1. 打开表文件
USE employee
2. 修改表结构
MODIFY STRUCTURE
3. 在“表设计器”中,单击“索引”选项卡,在“索引名”处输入“xm”,在“表达式”处选择“姓名”,单击“确定”按钮,在“结构更改为永久性更改?”提示对话框中,单击“是”按钮。
1. 打开并修改表单文件
MODIFY FORM formone
2. 双击表单“属性”的Load Event事件,在“Form1.Load”编辑窗口中输入下列两行语句:
use employee
set order to xm
3. 按“Ctrl+W”键关闭编辑窗口。
在“表单设计器”中,添加一个列表框List1控件,在其“属性”的Name处输入“mylist”,在Height处输入“60”,在MultiSelect处选择“.T. - 真”。
在“表单设计器”中,选中“列表框”控件,在其“属性”的RowSource处输入“employee.姓名”,在RowSourceType处选择“6 - 字段”。
二、
1. 在命令窗口中输入建立查询命令
CREATE QUERY queryone
2. 在“打开”对话框中,选择表“employee”再按“确定”按钮,在“添加表或视图”对话框中,单击“其他”按钮,选择表“order”再按“确定”按钮,在“联接条件”对话框中,直接按“确定”按钮。在“添加表或视图”中,再按“关闭”按钮。
3. 单击“字段”选项卡,选择试题要求的字段添加到“选定字段”列表框中。
4. 单击“排序依据”选项卡,选择“Order.金额”并选择“降序”,接着单击“添加”按钮。
5. 单击“杂项”选项卡,在“列在前面的记录”中,把“全部”前面的“勾”去掉,在“记录个数”处输入“10”。
6. 单击“查询\输出去向”菜单项,在“查询去向”对话框中,单击“表”按钮,在“表名”处输入“tableone”,再单击“确定”按钮。
7. 按“Ctrl+W”键保存该查询并运行。
1. 创建数据库
CREATE DATABASE order_m
2. 添加表到数据库中
ADD TABLE employee
ADD TABLE order
3. 打开并修改数据库
MODIFY DATABASE order_m
4. 单击“文件\新建”菜单项,在“新建”对话框中选择“视图”单选钮,再单击“新建文件”。在“添加表或视图”对话框中,双击表“employee”(或单击选中表“employee”,接着单击“添加”按钮),再双击表“order”,在“联接条件”对话框中直接单击“确定”按钮,接着在“添加表或视图”对话框中,单击“关闭”按钮,来关闭此对话框。
5. 单击“字段”选项卡,选择试题要求的字段添加到“选定字段”列表框中。
6. 单击“筛选”选项卡,在“字段名”选择“Employee.组别”,在“条件”处选择“=”,在“实例”处输入“1”。
7. 单击“排序依据”选项卡,选择“Employee.职员号”并选择“升序”,接着单击“添加”按钮。选择“Order.金额”,单击“添加”按钮,再在“排序条件”列表框选中“Order.金额”,然后单击“降序”单选钮。
8. 保存该视图,在“保存”对话框中输入视图名“viewone”。
9. 运行该查询,并在命令窗口输入“copy to tabletwo”把查询结果输出到“tabletwo”中。
三、
一、建立表文件
CREATE TABLE tablethree(姓名 C(6), 最高金额 N(6,2), 最低金额 N(6,2), 平均金额 N(6,2))
二、建立表单
1. 使用命令建立表单
CREATE FORM formtwo
2. 在“表单设计器”中,在“属性”的Caption处输入“综合应用”。
3. 在“表单设计器”中,添加一个表格控件(Grid1),在“属性”的RecordSourceType处选择“4 - SQL 说明”,再添加一个文本框(Text1)。
4. 在“表单设计器”中,添加两个命令按钮(Command1和Command2),单击第1个命令按钮在“属性”的Caption处输入“查询统计”,单击第2个命令按钮在“属性”的Caption处输入“退出”。
5. 双击“查询统计”命令按钮,在“Command1.Click”编辑窗口中输入命令组,接着关闭编辑窗口。
set talk off
Thisform.Grid1.RecordSource="select 订单号,金额;
from employee join order on Employee.职员号 = Order.职员号;
where employee.姓名=alltrim(thisform.text1.value);
order by 金额 into cursor lsb"
select lsb
go top
mi=金额
go bottom
ma=金额
average 金额 to av
select tablethree
append blank
replace 姓名 with alltrim(thisform.text1.value),最高金额 with ma,最低金额 with mi,平均金额 with av
set talk on
6. 双击“退出”命令按钮,在“Command2.Click”编辑窗口中输入“Release Thisform”,并关闭编辑窗口。