set talk off use student list clear input "请输入系别号:" to xbh do while .not.eof() do case case 系别号="02" repla 入学成绩 with 入学成绩*（1+10%） case 系别号="04" repla 入学成绩 with 入学成绩*(1+8%) other repla 入学成绩 with 入学成绩*(1+5%) endcase enddo sort on 入学成绩/d to xih use xih retu 

我看了半天，也找不出错误在什么地方。

笨蛋，你的表里就一条记录啊？skip语句呢？