ActiveSelectionSet 属性 (ActiveX)
获取图形的活动选择集。 支持的平台:仅限 Windows 言论没有其他评论。 例子VBA: Sub Example_ActiveSelectionSet() Dim sset As AcadSelectionSet ' The following example returns current selection set from current drawing Set sset = ThisDrawing.ActiveSelectionSet End Sub 可视化 LISP: (vl-load-com) (defun c:Example_ActiveSelectionSet() (setq acadObj (vlax-get-acad-object)) (setq doc (vla-get-ActiveDocument acadObj)) ;; The following example returns the current selection set from the current drawing (setq sset (vla-get-ActiveSelectionSet doc)) ) |
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2025-3-14 07:01
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.