边界vba

amir0914 · 发表于 2022-7-6 21:47:33

大家好，在多段线内获取点后，如何在vba中使用边界命令？？

我使用lisp代码：

（设定点）
（命令“边界”点“”）

我在vba中编写了相同的代码，但不起作用：

Pnt=此图纸。公用事业GetPoint（，“输入点：”）
此图纸。SendCommand“_boundary”&Pnt&vbCr

BIGAL · 发表于 2022-7-6 22:35:20

关于addboundary有什么帮助？可以绕开问题也可以试试Bpoly。

smuthuc · 发表于 2022-7-6 22:51:33

：）这对你有帮助

公共Sub Draw\u Bpoly（）

Dim p作为变型
p=本图纸。公用事业GetPoint（，“第一个点：”）
此图纸。设置变量“osmode”，0
此图纸。SendCommand“_.-boundary”&vbCr&“\u A”&vbCr&“\u I”&vbCr&“\u N”&vbCr&vbCr&vbCr&p（0）&”、“&p（1）&vbCr&vbCr

末端接头

享受

[编程交流] 边界vba

发表回复

精选推荐