综上所述，我们三个都没有用你字符转来转去的的思路。

完全正确！

完全正确！

哦，知道啦。

[此贴子已经被作者于2020-1-2 07:19编辑过]

运行结果

[此贴子已经被作者于2020-1-2 06:36编辑过]

基本思路是最值得我学习的。我是退休后才开始学，最缺的就是思路。还有就是常用命令的灵活运用。学习啦。

谢谢这么多版主无私指教！！！
上面的大小比较只是针对1个字段，如果是多个字段又如何解决。
下表是对3个字段（m0、m1、m3）进行比较(大、小、同）:

楼主研究的是快三彩票吧

有点类似，也是属随机性。

[此贴子已经被作者于2020-1-2 11:20编辑过]

CLOSE DATABASES 
USE 大小比较1
FOR i = 0 TO 2
    a1 = "M" + STR(i, 1) + "大"
    a2 = "M" + STR(i, 1) + "小"
    a3 = "M" + STR(i, 1) + "同"
    a4 = "M" + STR(i, 1)
    BLANK FIELDS (a1), (a2), (a3) ALL 
    ok = .F.
    SCAN 
        IF ok = .F.
            IF ISDIGIT(&a4) = .T.
            cStr = ALLTRIM(&a4)
            ok = .T.
            ENDIF
        ELSE
            IF ISDIGIT(&a4) = .T.
                DO CASE
                    CASE PADR(ALLTRIM(&a4), 10, " ") > PADR(cStr, 10, " ")
                        REPLACE (a1) WITH a1
                    CASE PADR(ALLTRIM(&a4), 10, " ") < PADR(cStr, 10, " ")
                        REPLACE (a2) WITH a2
                    CASE PADR(ALLTRIM(&a4), 10, " ") == PADR(cStr, 10, " ")
                        REPLACE (a3) WITH a3
                ENDCASE
                cStr = ALLTRIM(&a4)
            ENDIF
        ENDIF  
    ENDSCAN
ENDFOR 
BROWSE  

[此贴子已经被作者于2020-1-2 11:32编辑过]