| ObjectAdded 事件 (ActiveX) 在将对象添加到图形时触发。 支持的平台:仅限 Windows 签名VBA: object.ObjectAdded(Entity) 言论显示模式对话框时不会触发任何事件。 例子VBA: Private Sub AcadDocument_ObjectAdded(ByVal Object As Object)
    ' This example intercepts a drawing ObjectAdded event.
    '
    ' This event is triggered when an object is added to a drawing.
    '
    ' To trigger this example event: Add an object to an open drawing
    ' Use the "Object" variable to determine the type of object added
    MsgBox "A " & TypeName(Object) & " was just added to the drawing!"
End Sub可视化 LISP: Not available | 
 |Archiver|CAD开发者社区
( 苏ICP备2022047690号-1   苏公网安备32011402011833)
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1   苏公网安备32011402011833)
GMT+8, 2025-10-31 06:45
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.