CadRover 发表于 2008-7-6 16:08:26

在VBA查看边界框

有人知道在ACAD中是否可以看到实体的边界框吗
如果有，是否有人有这方面的VBA代码示例
谢谢
CAD
**** Hidden Message *****

fixo 发表于 2008-7-6 16:26:03

这就是你想要的代码0]
~'J'~

CadRover 发表于 2008-7-6 17:23:46


修复，
这似乎运行得很好，谢谢。
嘿，刚刚想到了一些东西；如果您想在直接窗口中提取实际点，您可以将这段代码添加到末尾
Dim i As Integer
For i = 0 To 9
Debug.Print "Vertice Pnt"; (i); Vertices(i)
Next i

这应该可以
CAD

fixo 发表于 2008-7-7 02:19:32

拍得好
很高兴你自己解决了
快乐计算
~'J'~

CadRover 发表于 2008-7-8 02:14:11


是的，谢谢
如果您想对实体做进一步的操作，如计算midpnt、移动它等，拥有这些点总是很好的
页: [1]
查看完整版本: 在VBA查看边界框