3.6.1 计算代码设计
在“MAIN” 表单的Command3控件的Click行为中添加如下代码:
&& 计算高分段的平均分 SET TALK OFF CLOSE ALL GFD_L=0 GFD_W=0 USE DMD_G.DBF GFD_L=DMD_G.CHJ1 GFD_W=DMD_G.CHJ2 USE
USE LKGF.DBF DELETE ALL PACK USE
USE LKGFBB.DBF DELETE ALL PACK USE
&& 计算理科的高分段平均分 SUM_GF=0 &&高分段人数 FOR I=1 TO 3 DO CASE CASE I=1 BJ_DAIMA="CJG301.DBF"
BJ_NAME="高三(1)班"
CASE I=2 BJ_DAIMA="CJG302.DBF"
BJ_NAME="高三(2)班"
CASE I=3