关于VFP的问题~~急!!!

来源:百度知道 编辑:UC知道 时间:2024/09/21 20:59:12
1、将“宿舍”字段的宽度增加到7位,每个学生的新宿舍号是在旧宿舍号后面增加一位字符:如果学号的前两位是01或02,则增加”B”; 如果学号的前两位是03或04,则增加”S”。(例如02024270的宿舍号改为10-602B);

2、“期末考试.PJX”项目中有一程序pb001.prg(已在考试目录中),请补充完善(修改程序时,先删除下划线(保留&&填空[N]),然后填上合适的内容,每处只能填写一条语句或子句)(10分)
由于误操作“STUDENTS.DBF”表中存在一些同名的记录,程序pb001.prg是要在“STUDENTS.DBF”表中,将“姓名”重复的记录删除。
******pb001.prg*******
USE STUDENTS
SET ORDER TO ________ &&填空[1]
GO TOP
XM=姓名
________ &&填空[2]
DO WHILE ________ &&填空[3]
IF ________ &&填空[4]
DELE
ELSE
XM=姓名
ENDIF
SKIP
________ &&填空[5]
*PACK
USE
RETURN

3、现有借阅.DBF”、“读者.DBF,如何在视图里面使用按照借书证号去计算每个人的借书名册数?

4、设计表单,课程考试分为笔试和机试,如果机试成绩<60, 则总评成绩为机试成绩;如果机试成绩≥60, 则总评成绩为(笔试+机试)/2。计算里面的代码填什么?

非常急~~~求答~~~~!!

1. if left(宿舍)="01" OR left(宿舍)="02"
replace 宿舍 with alltrim(宿舍)+"B"
else
if left(宿舍)="01" OR left(宿舍)="02"
replace 宿舍 with alltrim(宿舍)+"S"
endif
endif
2.
1、姓名
2、skip
3.!eof()
4.姓名=xm
5.enddo

3.select 读者.姓名,count(*) from 借阅,读者 ;
where 借阅.借书证号=读者.借书证号 ;
group by 姓名

4.if 机试成绩<60
总评成绩=机试成绩
else
总评成绩=(笔试+机试)/2
endif

1
do case
case 学号='01' or 学号='02'
repla 宿舍号 with trim(宿舍号)+'B'
case 学号='03' or 学号='04'
repla 宿舍号 with trim(宿舍号)+'S'
ENDCASE

2
姓名
SKIP
NOT EOF()
ENDDO

3
select A.姓名,count(*) from 借阅 B,读者 A ;
where B.借书证号=A.借书证号 group by A.姓名

4
IF 机试成绩<60
REPLA 总评成绩 WITH 机试成绩
ELS