三、</p> 一、建立表文件8 @# H3 e0 K. ~* y! d
CREATE TABLE tablethree(姓名 C(6), 最高金额 N(6,2), 最低金额 N(6,2), 平均金额 N(6,2))
) t7 X& e" r4 e" V, O, R/ v 二、建立表单# R8 g! |1 G4 `
1. 使用命令建立表单1 \) g, P, ?) O' _
CREATE FORM formtwo
% V0 v% b+ w0 s c* p& j) c& ^ 2. 在“表单设计器”中,在“属性”的Caption处输入“综合应用”。; Z0 Q; Z x" @/ B
3. 在“表单设计器”中,添加一个表格控件(Grid1),在“属性”的RecordSourceType处选择“4 - SQL 说明”,再添加一个文本框(Text1)。" B# K n- f5 ~( [) U$ X
4. 在“表单设计器”中,添加两个命令按钮(Command1和Command2),单击第1个命令按钮在“属性”的Caption处输入“查询统计”,单击第2个命令按钮在“属性”的Caption处输入“退出”。
6 O- n5 `% `8 p: W {7 Z. c 5. 双击“查询统计”命令按钮,在“Command1.Click”编辑窗口中输入命令组,接着关闭编辑窗口。6 b% _/ q M! G" ~ g/ V% V
set talk off# M; h+ x- I2 B
Thisform.Grid1.RecordSource="select 订单号,金额;, M7 H) l- M5 ?' j0 Y
from employee join order on Employee.职员号 = Order.职员号;" J0 G: v. S S b" h: Z3 M
where employee.姓名=alltrim(thisform.text1.value);8 Z2 W- H5 s. |9 c' N
order by 金额 into cursor lsb"
z1 l7 Q0 o3 [" q* w select lsb4 \; f* \- x7 b8 h5 p
go top
4 b$ t+ _: H" U% [ mi=金额
% M! n% E u5 C% I3 P9 \ go bottom9 A+ U/ J C* T- t
ma=金额
' b" B3 \5 |) b7 {* J9 t average 金额 to av7 b3 v7 l$ i1 |$ ?6 I C0 V
select tablethree
# q$ ^, b: |, r! ^- l append blank0 G/ K% G3 X& B0 T5 s
replace 姓名 with alltrim(thisform.text1.value),最高金额 with ma,最低金额 with mi,平均金额 with av3 r X7 e" n) K$ M2 u
set talk on
. V$ ^8 n. `( T, X8 w 6. 双击“退出”命令按钮,在“Command2.Click”编辑窗口中输入“Release Thisform”,并关闭编辑窗口。 |