USE 报表 ALIAS kk
INDEX on 考点代码+考场号+座号 TO temp
SELECT 考点代码,考点名称 FROM kk INTO CURSOR xxdm ORDER BY 考点代码 GROUP BY 考点代码,考点名称
SET PRINTER TO NAME GETPRINTER()
SCAN
    SELECT kk
    SET FILTER TO kk.考点代码=xxdm.考点代码
    aa=messagebox("现在打印 "+ALLTRIM(xxdm.考点代码)+" 桌签，请粘贴正确文件名!",3)
    IF aa=6
        _cliptext=ALLTRIM(xxdm.考点代码)+ALLTRIM(xxdm.考点名称)+"桌签"
        REPORT FORM zhuoqian.FRX NOEJECT NOCONSOLE TO PRINTER
    ELSE
        IF aa=2
            EXIT
        ENDIF
    ENDIF
ENDSCAN

哪位大神给翻译翻译!

USE 报表 ALIAS kk && 打开表(报表)
INDEX on 考点代码+考场号+座号 TO temp && 3字段值合并后的值,相同的集合在一块,形成索引排序)
SELECT 考点代码,考点名称 FROM kk INTO CURSOR xxdm ORDER BY 考点代码 GROUP BY 考点代码,考点名称 && 生成:考点代码+考点名称要唯一的表 xxdm
SET PRINTER TO NAME GETPRINTER() && 选择一个打印机
SCAN && 对 xxdm 从上到下遍历(就是一条条的查)

    SELECT kk
    SET FILTER TO kk.考点代码=xxdm.考点代码 && 筛选出符合条件的一批记录
    aa=messagebox("现在打印 "+ALLTRIM(xxdm.考点代码)+" 桌签，请粘贴正确文件名!",3) && 信息框询问如何对待这批记录
    IF aa=6 && 选择'是'打印
        _cliptext=ALLTRIM(xxdm.考点代码)+ALLTRIM(xxdm.考点名称)+"桌签" && 报表上的一个参数,打出一个表头吧...
        REPORT FORM zhuoqian.FRX NOEJECT NOCONSOLE TO PRINTER && 非预览,直接打印
    ELSE && 不选'是' 时
        IF aa=2 && 选'取消'时退出
            EXIT
        ENDIF
        && 选'否'时不打印继续循环
    ENDIF
ENDSCAN

_cliptext=ALLTRIM(xxdm.考点代码)+ALLTRIM(xxdm.考点名称)+""
应该是将 “考点代码考点名称”+桌签，放入粘贴板。
这句不知道有什么用。可能后面要调用最后打印的考点名称？

可能是，没研究明白

不是可能，是确定。
这是典型的通过剪贴板在不同程序间传递数据的手段。

为什么这样打印出来是的是全部全部考点的，没有按照考点，一个考点一个考点的打印！

USE 报表 ALIAS kk
INDEX on 考点代码+考场号+座号 TO temp
SELECT 考点代码,考点名称 FROM kk INTO CURSOR xxdm ORDER BY 考点代码 GROUP BY 考点代码,考点名称
SET PRINTER TO NAME GETPRINTER()
SCAN
    SELECT kk
    SET FILTER TO kk.考点代码=xxdm.考点代码
    aa=messagebox("现在打印 "+ALLTRIM(xxdm.考点代码)+" 桌签，请粘贴正确文件名!",3)
    IF aa=6
        _cliptext=ALLTRIM(xxdm.考点代码)+ALLTRIM(xxdm.考点名称)+"桌签"
        REPORT FORM zhuoqian.FRX NOEJECT NOCONSOLE TO PRINTER
    ELSE
        IF aa=2
            EXIT
        ENDIF
    ENDIF
ENDSCAN



说明：我想按照考点一个考点一个考点的打印，为什么这段代码是打印全部考点？

为什么这样打印出来是的是全部全部考点的，没有按照考点，一个考点一个考点的打印！