如何判断一个字符串中是否含有汉字或汉字标点(即双字节字符)?

如何判断一个字符串中是否含有汉字或汉字标点(即双字节字符)?
---------------------------------------------------------------

*方法一:
LOCAL lcString
lcString="adfd1成21d功fdsf577"
IF LENC(ALLTRIM(lcString)) <> LEN(ALLTRIM(lcString))
MESSAGEBOX("字符串中含用双字节字符!",64,"信息提示")
ENDIF

*方法二:
LOCAL lcString
lcString="adfd1成21d功fdsf577"
FOR I=1 TO LEN(ALLTRIM(lcString))
IF ISLEADBYTE(SUBSTR(ALLTRIM(lcString),I,1))
MESSAGEBOX("字符串中含用双字节字符!",64,"信息提示")
EXIT
ENDIF
ENDFOR

*方法三:
LOCAL lcString
lcString="adfd1成21d功fdsf577"
FOR I=1 TO LEN(ALLTRIM(lcString))
IF ASC(SUBSTR(ALLTRIM(lcString),I,1))>122
MESSAGEBOX("字符串中含用双字节字符!",64,"信息提示")
EXIT
ENDIF
ENDFOR

Published At
Categories with 数据库类
comments powered by Disqus