Description This function retrieves the geometry units from the associated FRED document. If there is a problem the function returns an empty string and does not set an error.
Syntax geomUnits = GetUnits ( )
Parameters geomUnits (String) Returns the units used for the geometry of the FRED system.
Example The following example demonstrates how to retrieve a units conversion scale factor to convert from the current document units into meters.
Sub Main Dim unitsSF As Double unitsSF = GetUnitConvFactor( GetUnits(), "meter" )
Print "Conversion scale factor to meters = " & unitsSF End Sub
See Also
|