请问提取"【"开始，"】"结束之间的字符串正则怎么写？

VBALISPER

搜出来了，替换字符填上你需要的就是了。

VBALISPER

没有注册，就注册一下

VBALISPER

http://bbs.mjtd.com/forum.php?mo ... hlight=%D5%FD%D4%F2

VBALISPER

有事实证明，autolisp可以用正则。如果你还不能用，可能是遇到假的CAD了。

统一网名

("【阳月南飞雁，传闻至此回】" "【我行殊未已，何日复归来】")


是不是要这样的结果？

tender138

统一网名 发表于 2024-11-10 17:30
("【阳月南飞雁，传闻至此回】" "【我行殊未已，何日复归来】")

谢谢！我想如下结果：
("阳月南飞雁，传闻至此回" "我行殊未已，何日复归来")

统一网名

tender138 发表于 2024-11-10 17:38
谢谢！我想如下结果：
("阳月南飞雁，传闻至此回" "我行殊未已，何日复归来")

• ;删除字符中多的字符
• (defun scdgzf (str delim / L1 L2)
•   (setq  str   (vl-string->list str)  delim (vl-string->list delim) )
•   (while str
•     (if  (not (member (car str) delim))
•       (setq l1 (cons (car str) l1))
•       (if l1  (setq l2 (cons (vl-list->string (reverse l1)) l2)  l1 nil))
•     )
•     (setq str (cdr str))
•   )
•   (if l1(setq l2 (cons (vl-list->string (reverse l1)) l2)))
•   (reverse l2)
• )
• 这个函数是在本论坛上找的，原作者不记得了。
• (defun c:aa(/ lst)
•   (scdgzf "阳月南飞雁，传闻至此回。【我行殊未已，何日复归来】" "\【\】\。")
• )
  

结果 ：("阳月南飞雁，传闻至此回" "我行殊未已，何日复归来")

tender138

统一网名 发表于 2024-11-10 18:24

;删除字符中多的字符

(defun scdgzf (str delim / L1 L2)

  (setq  str   (vl-string->list ...

非常感谢你的帮忙，但【、】是不确定的特征字符串

xyp1964

;;非源码谨慎下载