以下是引用bccn201203在2012-9-25 20:56:40的发言：

? ALINES(aMy, UPPER([abc,dbf])+ [b8], 'B','b') && 这里不是取到之间的字符串，看下面的运行结果
?amy(1)
?amy(2)
?amy(3)
?amy(4)

以下是引用bccn201203在2012-9-25 20:46:27的发言：

字符串中必须有 R 及 r 才起作用

你再研究下这个函数
STREXTRACT( ) 函数
与ALINES()相比是不是相似

以下是引用hu9jj在2012-9-25 21:32:21的发言：

下面是身份证15位自动转换成18位的函数，也许会对楼主有点用。

PARAMETERS cSFZ15
cSFZ15 = ALLTRIM(cSFZ15)
IF LEN(cSFZ15)<>15 AND LENC(cSFZ15)<>15
    RETURN "不是15位身位证号码!"
ENDIF
    IF NOT CHRTRAN(cSFZ15,"1234567890","")==""
        RETURN "含有非数字,不是身份证号码!"
    ENDIF
    cSFZ17 = STUFF(cSFZ15,7,0,'19')
    cBy17='7,9,10,5,8,4,2,1,6,3,7,9,10,5,8,4,2'
    cCheck='10X98765432'
    nCheck=0
    FOR nCnt=1 TO 17
        nCheck=nCheck+VAL(SUBSTR(cSFZ17,nCnt,1))*VAL(GETWORDNUM(cBy17,nCnt,','))
    NEXT
    RETURN cSFZ17+SUBSTR(cCheck,nCheck%11+1,1)
ENDIF