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