[求助]正则表达式

blueshake

请教各位大侠，如下程序

2. (defun c:tt(/ regex lst)    (vl-load-com)  (setq regex (vlax-create-object "Vbscript.RegExp"))  (vlax-put-property regex "IgnoreCase" 0) (vlax-put-property regex "Global" 1)  ;   (vlax-put-property regex "Pattern" ".*%%P([\d]+[\\\\.]?[\d]*).*")  (setq string "<>%%P0.05gd")  (setq result (vlax-invoke-method regex "Replace" string "$1"))   (princ result)  (vlax-release-object regex)    )

(defun c:tt(/ regex lst)    (vl-load-com)  (setq regex (vlax-create-object "Vbscript.RegExp"))  (vlax-put-property regex "IgnoreCase" 0) (vlax-put-property regex "Global" 1)  ;   (vlax-put-property regex "Pattern" ".*%%P([\d]+[\\\\.]?[\d]*).*")  (setq string "<>%%P0.05gd")  (setq result (vlax-invoke-method regex "Replace" string "$1"))   (princ result)  (vlax-release-object regex)    )

在AutoCAD中，总是输出""，
但是我在正则表达式测试工具中都是输出0.05请教大侠们原因，谢谢。

狂刀lxx

(vlax-put-property
    regex
    "Pattern"
    ".*%%P([\\d]+[\\\\\\\\.]?[\\d]*).*"
  )

lisp中 \\ 代表 \