NorthRotation Example

Sub Example_NorthRotation()

    ' This example returns the NorthRotation setting for the current drawing.

    Dim dbPref As AeccDatabasePreferences

    Set dbPref = AeccApplication.ActiveDocument.Preferences

    MsgBox "The current value for NorthRotation is: " & dbPref.NorthRotation, _

        vbInformation, "NorthRotation Example"

End Sub