當然沒那麼容易。正路是用內碼判別,而且不能用普通的substr()之類,必須用substrc()這種帶C的函數提取字符,最準確的辦法是瞭解編碼規則之後查表。										
					
	
	
	
			
授人以渔,不授人以鱼。

 2013-12-09 21:47
	    2013-12-09 21:47
   程序代码:
程序代码:
CLEAR ALL
CLEAR
cString = "1壹2貳叁ABC肆"
? "cString = " + cString
?
FOR nIndex = 1 TO LENC(cString)
    cChar = SUBSTRC(cString, nIndex, 1)
    ? PADR(cChar, 2) + " 是 " + IIF(ASC(cChar) > 255, "漢字字符", "西文字符")
NEXT
?
RETURN

 2013-12-09 22:35
	    2013-12-09 22:35
  
 2013-12-09 23:08
	    2013-12-09 23:08
   2013-12-09 23:10
	    2013-12-09 23:10
   2013-12-09 23:11
	    2013-12-09 23:11
   2013-12-09 23:13
	    2013-12-09 23:13
  
 2013-12-09 23:43
	    2013-12-09 23:43
  
 2013-12-09 23:49
	    2013-12-09 23:49
   2013-12-10 07:43
	    2013-12-10 07:43
   2013-12-10 07:54
	    2013-12-10 07:54