CorrdinatePrecision Example

Land Auto

CoordinatePrecision Example

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