社区 › Auto Lisp › 需要lisp或函数lisp

hosyn 发表于 2022-7-6 06:18:54

需要lisp或函数lisp

我需要lisp或函数lisp来更改字符串变量：
更改字符串：和\\带-。
 
 

"D:\\ffffff\\hh\\Mylocation\\"
至
任何建议。

BlackBox 发表于 2022-7-6 06:45:08

试试这个：
 

(vl-load-com)

(defun _Subst (newString pattern string)
;; Example:
;; (_Subst "-" '("\\" ":") "D:\\ffffff\\hh\\Mylocation\\")
(foreach x pattern
   (while (vl-string-search x string)
   (setq string (vl-string-subst newString x string))
   )
)
string
)

hosyn 发表于 2022-7-6 07:01:29

亲爱的Blackbox
超过XXXXXXXXXXXXX
Greatttttttttttttttttt:）
我试了一下，非常好

BlackBox 发表于 2022-7-6 07:18:14

 
干杯，霍辛

Lee Mac 发表于 2022-7-6 07:22:05

或：
3

查看完整版本: 需要lisp或函数lisp