BorderTopMargin Example
Sub Example_BorderTopMargin ()
' This example returns the BorderTopMargin setting for the current drawing.
Dim dbPref As AeccDatabasePreferences
Set dbPref = AeccApplication.ActiveDocument.Preferences
MsgBox "The current value for BorderTopMargin is: " & dbPref.BorderTopMargin, _
vbInformation, "BorderTopMargin Example"
End Sub