rodrigo_sjc_sp 发表于 2022-7-6 06:54:44

基本-替换字符us

如何替换字符串中的此字符/或\
我试着
（setq usuario（vl string subst”“\\”usuario））
但不可以，字符不替换
 
 
样品
usuario=“TESTE-TE\AAAA\BBBB.x”
 
我需要这个
usuario=“TESTE-teaaabbb.x”
 
谢谢
罗德里戈

Tharwat 发表于 2022-7-6 07:03:45

要替换或删除后斜杠吗？

rodrigo_sjc_sp 发表于 2022-7-6 07:18:04

我想删除，
 
更多尝试替换为null“”

Lee Mac 发表于 2022-7-6 07:28:34

_$ (vl-list->string (vl-remove 92 (vl-string->list "TESTE-TE\\AAAA\\BBBB.x")))
"TESTE-TEAAAABBBB.x"
_$ (setq str "TESTE-TE\\AAAA\\BBBB.x")
"TESTE-TE\\AAAA\\BBBB.x"
_$ (while (wcmatch str "*\\*") (setq str (vl-string-subst "" "\\" str)))
"TESTE-TEAAAABBBB.x"

Tharwat 发表于 2022-7-6 07:34:00

这
 

(setq usuario "TESTE-TE/AAAA\BBBB.x")

(setq st (vl-list->string (vl-remove 47 (vl-string->list usuario))))

rodrigo_sjc_sp 发表于 2022-7-6 07:41:50


(setq usuario (read-line arq))
(setq usuario (vl-string-subst "" "-"usuario))
(setq usuario (vl-string-subst "" "/"usuario))
(setq usuario (vl-list->string (vl-remove 92 (vl-string->list usuario))))

 
感谢所有人（李和塔瓦）

Lee Mac 发表于 2022-7-6 07:52:03

也许 吧：
(vl-list->string (vl-remove-if '(lambda ( x ) (member x '(45 47 92))) (vl-string->list (read-line arq))))

togores 发表于 2022-7-6 08:02:22

罗德里戈，
如果您希望将子字符串替换为另一个子字符串，也可以尝试：
像这样：
_$（替换“\\”TESTE-TE\AAAA\BBBB.x”）
“TESTE-teaaabbb.x”
页: [1]
查看完整版本: 基本-替换字符us