自考的VFP题 急,高分请教!

来源:百度知道 编辑:UC知道 时间:2024/05/25 07:43:42
1. (本小题20分)建立一个名为XS.DBF的文件,其结构如下:
字段 字段名 字段类型 字段宽度 小数
1 学号 C 2
2 姓名 C 8
3 性别 C 2
4 生日 D 8
5 总分 N 5 1

输入如下记录:
学号 姓名 性别 生日 总分
21 赵花 男 02/04/1984
23 钱倩 女 05/13/1985
54 孙小美 女 12/15/1984
59 李明 男 11/09/1987

建立表文件XSCJ.dbf,其结构包括:学号,C,2;英语,N,5,1;数学,N,5,1;总分,N,5,1;语文,N,5,1;总分,N,5,1。并输入如下记录:
学号 英语 数学 语文
12 90 89 90
13 95 95 95
24 80 98 87
25 70 100 86

2. (本小题30分)编写一程序,文件名为:SCZF.prg,要求求出每一位学生的总成绩,并将结果保存在表文件XS.dbf中。
3. (本小题30分)编写一程序,文件名为:XG.prg,要求从键盘上输入学生的学号,若该学号不存在,则显示“查无此人”的信息;若学号存在,则列出该学生的学号、姓名、出生日期、团员否、语文、数学、英语等信息,之后提示用户是否删除该学生记录,若要删除则删除之,否则放弃删除。要求能连续删除,直至用户不想继续删除为止。
4. (本小题20分)编写一程序,文件名为:PX.prg,要求系统自动列出总分最高和最低的学生学号、姓名及总分等信息。 (做234题)

VFP不会,给你写上sql语句吧,以下语句均为sqlserver2000的写法。应该是差不多的

2--
update XS set 总分=x.英语+x.数学+x.语文 from XSCJ x where x.学号=XS.学号
3--
查找select * from XS,XSCJ x where x.学号=XS.学号
if @@rowcount=0
--输出“查无此人”
else
--输出“是否删除”
--判断用户选择,是则删除,否则推出
--删除就是一句delete,有几个表,就删除几个记录
--连续删除没明白

4--
select * from XS,XSCJ x where x.学号=XS.学号
and x.英语+x.数学+x.语文 in (select max(英语+数学+语文) from XSCJ union select min(英语+数学+语文) from XSCJ)