用法
评论
建议
取 消
确 定
(defun vectra:string-substp (str find repl p / pos len) (setq len (strlen find) pos 0 occ 0) (while (and (setq pos (vl-string-search find str pos)) (< (setq occ (1+ occ)) p)) (setq pos (+ pos len))) (if (= occ p) (vl-string-subst repl find str pos) str))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 767 个
函数库类别: 53 种
上传记录
刷新