BorderBottomMargin Example

Land Auto

BorderBottomMargin Example

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