第14套 一、1 p6 [) J/ P+ K: R6 @
SELECT * FROM student WHERE 性别="男" ORDER BY 学号 INTO TABLE results
' p$ ~# Q, ^. \6 z 1. 单击“工具\向导\表单”菜单项,并显示“向导选取”对话框。
+ j4 E/ N) O+ u" |) w! x 2. 在“向导选取”对话框中,选择“表单向导”并单击“确定”按钮,并显示“表单向导”对话框。
: N0 k# ~/ E" z* G3 \8 b 3. 在“表单向导”对话框的“步骤1-字段选取”中,首先要选取表“student”,在“数据库和表”列表框中,选择表“student”,接着在“可用字段”列表框中显示表student的所有字段名,并选定“学号”、“班级”、“姓名”和“性别”四个字段,再单击“下一步”按钮。
4 h7 a3 g0 d. ?0 v3 t 4. 在“表单向导”对话框的“步骤2-选择表单样式”中,再单击“下一步”按钮。
8 B8 {0 B" T- p) Y6 i# D 5. 在“表单向导”对话框的“步骤3-排序次序”中,选定“学号”字段并选择“升序”,再单击“添加”按钮,再单击“完成”按钮。
% h1 \- [+ k, h. o 6. 在“表单向导”对话框的“步骤4-完成”中,再单击“完成”。4 I4 O/ l4 F( `0 t( V( z
7. 在“另存为”对话框中,输入保存表单名“student”,再单击“保存”按钮,最后表单就生成了。( H8 w" R* X6 P. ]- x3 s( C; E* K o
DO FORM student
4 I$ l; K3 T3 S% W B ALTER TABLE student ADD COLUMN 年龄 N(2)
3 c. ~! v' }$ B, a2 ]* { 二、
3 ~3 B/ [! D; Z- Z1 T+ z" c 第1处:判断是否找到,所以应改为:DO WHILE FOUND()
& r. E1 ?: ^8 f; X" z$ j5 f8 Z 第2处:如果是“女”,则继续,所以应改为:LOOP/ Z* S) V+ n5 d5 U i6 T8 d1 @
第3处:继续查找下一个,所以应改为:CONTINUE
. p. }( u: K' `4 [" G9 j' ]( l 在文件sprog.prg中存放下面两条SQL语句:
4 [2 p4 R/ C5 F( m UPDATE student SET 年龄=year(date()) - year(出生日期)# l" A4 R; ~: Z! R8 P4 \3 n/ ?
SELECT Student.政治面目, COUNT(*) AS 人数, AVG(年龄) AS 平均年龄 FROM student GROUP BY Student.政治面目 INTO TABLE sqlresults. p6 J3 K7 T" Q: e* W R0 B
三、, T) H% I9 k: \; ~) }/ B6 t
在文件progzh.prg存放内容如下:
+ p# z: e6 N$ m2 Y- ?. |* o select 15 ?6 ?$ g N4 G0 _( I
use jieguo
. b1 Y0 W9 u7 {8 X' z select 2
- X/ R2 x" }' G! ~4 |* z% Z' Z: C use gnht
* o6 z: O9 M" e, e& n sum jhsl to asum && 计算订货总数7 `: P% B0 e; e" T; c, n
index on dhdw to aaa uniq
5 y) ?) l' f* l4 e# n count to adhdw && 计算订货单位数+ q D" `+ y3 p# t
index on ghdw to bbb uniq. F* a& r% P- u% P$ S
count to aghdw && 计算供货单位数9 @4 ^. n6 K+ t, S% E( g; ^
use. }& X' g" b3 Y* A( R; m
select 1
, b6 q6 i& k' P* N# L7 G6 E6 B3 P) O replace num with adhdw && 把订货单位数存放第1条记录中) {9 _0 U' D% A1 y. i8 o7 t
skip
$ C5 X# ?- l0 u/ _ replace num with aghdw && 把供货单位数存放第2条记录中4 `3 b* I! s% b0 M) `: K8 S
skip
7 V# I' Z1 V# b0 h/ p replace num with asum && 把订货总数存入第3条记录中
' d$ n; @! e* H) P( M x3 K list && 显示结果' \: W6 f# Y$ r% v# Y3 ~% x4 t8 `
use |