用法
评论
建议
取 消
确 定
(defun vectra:regexp-match (str pattern / matchs reg r) (setq reg (vlax-create-object "vbscript.regexp")) (vlax-put-property reg (quote global) 1) (vlax-put-property reg (quote ignorecase) 1) (vlax-put-property reg (quote pattern) pattern) (setq matchs (vlax-invoke reg (quote execute) str)) (vlax-for k matchs (setq r (cons (vlax-get k (quote value)) r))) (vlax-release-object reg) (reverse r))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新