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