*方法一:
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
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