Application property example

 

Sub ApplicationProp_Example()

'The following example demonstrates how to return the Application property.

    Dim myObject As AcadApplication

    Set myObject = ThisDrawing.Application

    MsgBox ("Application is: " & myObject.Name)

End Sub

 

Bricscad™ is commercialized by Bricsys NV. Bricsys NV and Vondle NV are fully owned subsidiaries of Menhirs NV. © 2001- Menhirs NV - All rights reserved.