以下是引用bccn201203在2012-9-25 20:46:27的发言:
字符串中必须有 R 及 r 才起作用
你再研究下这个函数
STREXTRACT( ) 函数
与ALINES()相比是不是相似
字符串中必须有 R 及 r 才起作用
你再研究下这个函数
STREXTRACT( ) 函数
与ALINES()相比是不是相似
?StrExtract("abdcfhresdfjk", 'cf', 'sd', 1) = hre
梅尚程荀
马谭杨奚
*- 04 -第18位校验码验证 J=[0709100508040201060307091005080402] * Y值:012345678910 校验码=[10X98765432] LOCAL NUM,CTITLE NUM=0 CTITLE=[] FOR I=1 TO 17 NUM=NUM+VAL(SUBSTR(J,I*2-1,2))*VAL(SUBSTR(SFZH,I,1)) ENDFOR CTITLE=[第18位校验码为【]+SUBSTR(校验码,MOD(NUM,11)+1,1)+[】,与身份证校验码]+IIF(RIGHT(SFZH,1)==SUBSTR(校验码,MOD(NUM,11)+1,1),[相符],[不相符]) MESSAGEBOX(CTITLE,64,[系统信息])