ApplicationSettings.FreeformDrawingPrecision-Eigenschaft (Visio)

Artikel
04/07/2023

Bestimmt die zulässige Fehlertoleranz beim Zeichnen einer geraden Linie mit Freihandzeichnen, bevor ein Spline gezeichnet wird. Lese-/Schreibzugriff.

Syntax

Ausdruck. FreeformDrawingPrecision

Ausdruck Eine Variable, die ein ApplicationSettings-Objekt darstellt.

Rückgabewert

Long

HinwBemerkungeneise

Das Festlegen der FreeformDrawingPrecision-Eigenschaft entspricht dem Festlegen der Option Precision auf der Registerkarte Erweitert im Dialogfeld Visio-Optionen (klicken Sie auf die Registerkarte Datei , und klicken Sie dann auf Optionen).

Mögliche Werte für die FreeformDrawingPrecision-Eigenschaft reichen von 0 (Tight) bis 10 (Loose). Die möglichen Werte liegen in einem Bereich von 1 bis 998, der Standardwert ist 5.

Beispiel

Das folgende VBA-Makro (Microsoft Visual Basic für Applikationen) veranschaulicht, wie Sie mit der FreeformDrawingPrecision-Eigenschaft die aktuelle Einstellung der Genauigkeit für die Freiformzeichnung im benachbarten Fenster anzeigen. Außerdem wird gezeigt, wie Ein ApplicationSettings-Objekt aus dem Visio Application-Objekt abgerufen wird.

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 und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über