也可以这样,统计表窗口按钮:
ClearGrid(GridName) And AddCol("表1","a",3, False ) And EvalFor("表1","a","number([缴费日期])=number(MaxFor(""表1"",""缴费日期"",""姓名"",""="",[姓名]))") And AppendRows("表1","a","=",-1) And DelRow(GridName,1) And DeleteCol("表1","a")