ApplicationSettings.FreeformDrawingPrecision property (Visio)

Determines the margin of error allowed when the Freeform tool is drawing a straight line before it switches to drawing a spline. Read/write.

Syntax

expression.FreeformDrawingPrecision

expression A variable that represents an ApplicationSettings object.

Return value

Long

Remarks

Setting the FreeformDrawingPrecision property is equivalent to setting the Precision option on the Advanced tab in the Visio Options dialog box (click the File tab, and then click Options).

Possible values for the FreeformDrawingPrecision property range from 0 (Tight) to 10 (Loose). The default is 5.

Example

The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the FreeformDrawingPrecision property to print the current freeform drawing precision setting in the Immediate window. It also shows how to get an ApplicationSettings object from the Visio Application object.

Public Sub FreeformDrawingPrecision_Example() 
 
    Dim vsoApplicationSettings As Visio.ApplicationSettings 
    Dim lngPrecisionSetting As Long 
 
    Set vsoApplicationSettings = Visio.Application.Settings 
    lngPrecisionSetting = vsoApplicationSettings.FreeformDrawingPrecision 
 
    Debug.Print lngPrecisionSetting 
 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.