AreaPrecision Example

Sub Example_AreaPrecision()

    ' This example displays the AreaPrecision setting for the current drawing.

    Dim dbPref As AeccDatabasePreferences

    Set dbPref = AeccApplication.ActiveDocument.preferences

    MsgBox "The current value for AreaPrecision is: " & dbPref.AreaPrecision, vbInformation, "AreaPrecision Example"

End Sub