如何判断一个字符串中是否含有汉字或汉字标点(即双字节字符)?
---------------------------------------------------------------
*方法一:
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