Question

求高人指点VFP，急啊！！帮忙编写下命令按钮click事件的代码，多谢！

计算每一个学生的总学分并存入对应的学分字段。学分的计算方法是：物理60分以上（包括60分）2学分，否则0分；高数60分以上（包括60分）3学分，否则0分；英语60分以上（包括60分）4学分，否则0分。
根据上面的计算结果，生成一个新的表xf，（要求表结构的字段类型与score表对应字段的类型一致），并且按学分升序排序，如果学分相等，则按学号降序排序。

Answer 1

use score.dbf exclusive
do while not eof()
wlxf=0
gsxf=0
yyxf=0
zxf=0
if 物理>=60
wlxf=2
endif
if 高数>=60
gsxf=3
endif
if 英语>=60
yyxf=4
endif
zxf=wlxf+gsxf+yyxf
replace 学分 with zxf
skip
enddo
select * from score into table xf order by 学分 asc,学号 desc

Answer 2

公式：
use score
repl all 物理学分 with 2 for 物理>=60
repl all 高数学分 with 3 for 高数>=60
repl all 英语学分 with 4 for 英语>=60
repl all 总学分 with 物理学分+高数学分+英语学分
sort on 总学分,学号/d to xf