基本-替换字符us

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

如何替换字符串中的此字符/或\
我试着
（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

copy

_$ (vl-list->string (vl-remove 92 (vl-string->list "TESTE-TE\\AAAA\\BBBB.x")))
"TESTE-TEAAAABBBB.x"

copy

_$ (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

这

copy


(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

copy


 (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

也许吧：

copy

(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”

[编程交流] 基本-替换字符us

发表回复

精选推荐