npu349 发表于 2008-3-22 00:32:00

[求助]如何判断字符串中的汉字

一个字符串中含有汉字,字母,数字等..如何提取字符串中的汉字?哪位大侠能给个提示

ZZXXQQ 发表于 2008-3-22 09:01:00

(IF (> (ASCII (SUBSTR TXT I 1)) 127) (PRINC "汉字") (PRINC "字符"))

caoyin 发表于 2008-3-22 11:47:00

<p><br/>(defun test (str / lst)<br/>&nbsp; (setq&nbsp;lst (mapcar '(lambda (x) (if (&gt; x 159) (list x) '(34 32 34))) (vl-string-&gt;list str)))<br/>&nbsp; (vl-remove "" (read (strcat "(\"" (vl-list-&gt;string (apply 'append lst)) "\")")))<br/>)</p><p>(test "你好，mjtd 今天是 2008年3月22日")-&gt;("你好，" "今天是" "年" "月" "日")</p>

npu349 发表于 2008-3-23 14:33:00

多谢楼上两位,先试试..

waroklz 发表于 2013-8-20 16:00:10

多谢，不清晰！

自贡黄明儒 发表于 2013-8-20 16:50:44

waroklz 发表于 2013-8-20 16:00 static/image/common/back.gif
多谢，不清晰！

http://bbs.mjtd.com/thread-107150-1-1.html
现在用正则，字符处理从此不再愁
页: [1]
查看完整版本: [求助]如何判断字符串中的汉字