用法
评论
建议
取 消
确 定
(defun string:subst-all (str-new str-old str / inc len) "用 str-new 替换 字符串中所有的 str-old " "结果字符串" "(string:subst-all \"qwe\"\n \"abc\"\n \"mabcpoildabce\")\n => \"mqwepoildqwee\"" (if (> (strlen str-old) 0) (progn (setq len (strlen str-new) inc 0) (while (setq inc (vl-string-search str-old str inc)) (setq str (vl-string-subst str-new str-old str inc) inc (+ inc len))))) str)
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 767 个
函数库类别: 53 种
上传记录
刷新