[功能] 取文字末尾的数字
本帖最后由 自贡黄明儒 于 2013-10-9 09:31 编辑;;[功能] 取文字末尾的数字 By 自贡黄明儒
;;http://bbs.mjtd.com/thread-107150-1-1.html中定义xd::string:regexps
;;示例(HH:EndNumber "5.4a2.32")，返回"32"
(defun HH:EndNumber (str)
(car (xd::string:regexps "\\d+$" str ""))
)
页:
[1]