AreaSuffix Example

Land Auto

AreaSuffix Example

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