LinearPrecision Example

Land Auto

LinearPrecision Example

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