用法
评论
建议
取 消
确 定
(defun string:to-lst (str separator / pos) "字符串转成列表" (if (= "" separator) (mapcar (quote (lambda (x) (string:l2s-ansi (list x)))) (string:s2l-ansi str)) (if (setq pos (vl-string-search separator str)) (cons (substr str 1 pos) (string:to-lst (substr str (+ pos 1 (strlen separator))) separator)) (list str))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 747 个
函数库类别: 52 种
上传记录
刷新
冀公网安备 13050302000400号