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

npu349

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

ZZXXQQ

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

caoyin

(defun test (str / lst)
  (setq lst (mapcar '(lambda (x) (if (> x 159) (list x) '(34 32 34))) (vl-string->list str)))
  (vl-remove "" (read (strcat "(\"" (vl-list->string (apply 'append lst)) "\")")))
)

(test "你好，mjtd 今天是 2008年3月22日")->("你好，" "今天是" "年" "月" "日")

npu349

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

waroklz

多谢，不清晰！

自贡黄明儒

waroklz 发表于 2013-8-20 16:00
多谢，不清晰！

http://bbs.mjtd.com/thread-107150-1-1.html
现在用正则，字符处理从此不再愁