主题：设计个报表，同一小组的填列姓名、金额，最后汇总，如表中所示。。

SetVariable("%A%",Cell(rowsel,1,GridName)) And －－－把当前表选定行的第一列内容赋值给变量A；

FilterFor("小组号"," = ",[%A%],2) And －－－筛选出当前表的“小组号”等于变量A的所有行；

Subtotal("小组号","金额","2") And －－－以“小组号”分组，统计金额的累计值；

DelRow(GridName,Rows) And －－－删除统计后的最后一行（总计）；

Report(GridName,"99",1,Rows,0,1) And －－－打印报表“99”；

DelFor(GridName,"姓名"," = ","") And －－－删除当前表中“姓名”等于“空”的行；

Do(112)－－－显示所有行。