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

边界vba

大家好,在多段线内获取点后,如何在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
 
末端接头
 
享受
页: [1]
查看完整版本: 边界vba