求助下字符串里的字母数值区分

zhelindaxues

我需要从文本文档里读取一系列的数据，格式为 字母+数字+汉字。然后再把数字赋值给前面的字母，例如“abc321”

我把abc当成变量，把321赋值给abc。当然前面的字母个数不确定，数字个数也不确定。那我该如何来区分一个字符串里

的字母跟数值呢？

tengte

用这个函数可将你的字母和数字分开，如：(Split "a12b3c45de567fgh890")－－＞
("a" 12 "b" 3 "c" 45 "de" 567 "fgh" 890)

(defun Split (str / tmp i n p x len lst1 lst)
  (setq tmp  (vl-string->list str)
 lst1 (mapcar '(lambda (x) (and (<= 48 x) (<= x 57))) tmp)
 n    (length lst1)
 i    0
  )
  (while (< i n)
    (setq x (nth i lst1)
   i (1+ i)
    )
    (if (= i 1)
      (setq p 1
     len 1
      ) ;else
      (if (= x (nth (- i 2) lst1))
 (setq len (1+ len)) ;else
 (setq tmp (substr str p len)
       tmp (if x
      tmp
      (atoi tmp)
    )
       lst (append lst (list tmp))
       p   i
       len 1
 )
      ) ;if
    ) ;if
  ) ;while
  (if (> n 0)
    (setq tmp (substr str p len)
   tmp (if x
  (atoi tmp)
  tmp
       )
   lst (append lst (list tmp))
    )
  )
  lst
)

zhelindaxues

感谢楼上的，但是这样对小数点起不了作用。例如abc32.5 我要的是“abc” “32.5”   而不是“abc” “32”“ .”“ 5”