getoperator.prg

来自「固定资产管理系统源码..用于企业资产管理,用VFP编码」· PRG 代码 · 共 19 行

LPARAMETERS cString
LOCAL cOperator
DO CASE 
    CASE cString=="大于"
        cOperator=">"
    CASE cString=="大于等于"
        cOperator="> ="
    CASE cString=="小于"
        cOperator="<"
    CASE cString=="小于等于"
        cOperator="< ="
    CASE cString=="等于"
        cOperator="="
    CASE cString=="不等于"
        cOperator="<>"
    OTHERWISE 
        cOperator=""
ENDCASE 
RETURN cOperator