如何使用VBA在AUTOCAD中操作屏幕上的选定对象？

Question

在autocad 2008中，我想学习如何操作屏幕所选对象。有一个名为ThisDrawing.SelectionSets的VBA对象，但它是一组选择，而不是用户选择的选定对象。哪个VBA对象代表用户选择的对象？

Answer 1

您还可以使用“内置”选择集来表示当前选定的对象。

Public Sub test()
    Dim ss As AcadSelectionSet
    Set ss = ThisDrawing.ActiveSelectionSet
    MsgBox ss.Count

End Sub

Answer 2

您实际上需要创建自己的选择集并将其添加到ThisDrawing.SelectionSets。

然后，当用户点击某个实体时，您需要将其添加到您创建的选择集中。

最后，您可以逐步浏览选择集中的每个实体，对其执行一些操作。

很抱歉，我无法提供VBA代码，因为我使用C＃，但这是您需要遵循的流程。但是，您可以通过点击F1然后查看下面的内容来获取AutoCAD内部的帮助：

ActiveX和VBA开发人员指南 - ＆gt;创建和编辑AutoCAD实体 - ＆gt;使用选择集