ApplicationSettings.FreeformDrawingPrecision-Eigenschaft (Visio)
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
Hinweise
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.