Cad如何插入微信小程序

方法/步骤:

2.首先，要将你下载好的小程序放在一个固定的文件夹中，方便你查找。

3.打开CAD之后，点击CAD最上方工具的菜单栏。

4.展开工具的菜单栏之后，找到加载应用程序这个选项，进入相关的界面。

5.这个时候会显示加载应用程序的界面，然后点击该羡棚界面上面的三角形符号。

6.在该界面中，找到之前你存小程序的位置，比如我之前存在D盘，我就可以点击D盘去找我的文件。

7.找到插件的目标文件夹尺返，选择你想加载的小程序，然后点击加载即可。

8.这时候会显示陵派饥你加载的应用程序加载成功，你就可以用这个小程序了。

autocad2007的copy自身就是多次拷贝，就是你不用输入m就是多次拷贝，但在二次开发中一定要用m

下面的lisp程序是用于拷贝

(defun c:ccp1 ()

(prompt "选择要拷贝的目或团闷标:")

(setq en (ssget))

(prompt "输入基点:")

(setq p1 (getpoint))

(command "copy" en "" p1 )

(while (setq p2 (getpoint))

(command p2)

)

)

在上面的程序中应没输入"m"虽然copy在命令下是多次拷贝的在程序中给它了多次拷贝的条件，但只能拷贝一次。

(defun c:ccp ()

(prompt "选择要拷贝的目标:")

(setq en (ssget))

(prompt "输入基点:")

(setq p1 (getpoint))

(command "copy" en "" "m" p1 )

(while (setq p2 (getpoint))

(command p2)

)

(command "")

)

在程序或桐ccp中在输入p1前加了"m" (command "copy" en "" "m" p1 )它就是多次拷贝

下面是一个循环只要p2有值它就要去拷贝,当你在(setq p2 (getpoint))输入回车，这时p2是空值，程序就退出。衫弯

2条吵慧路：

AutoCad lisp

AutoCAD VBA

如果你有点VB基础，可以学习升拆答第2种

推荐学习资料：autocad vba 初级教程（2020修订版）免费下载御明

---