Propriété ApplicationSettings.FreeformDrawingPrecision (Visio)

Détermine la marge d’erreur admise lorsque l’outil Forme libre dessine une droite avant de dessiner une spline. Lecture-écriture.

Syntaxe

expression. FreeformDrawingPrecision

Expression Variable qui représente un objet ApplicationSettings .

Valeur renvoyée

Entier long

Remarques

Définir la propriété FreeformDrawingPrecision revient à définir l’option Précision sous l’onglet Avancé de la boîte de dialogue Options Visio (cliquez sur l’onglet Fichier , puis sur Options).

Les valeurs possibles pour la propriété FreeformDrawingPrecision sont comprises entre 0 (Tight) et 10 (Loose). La valeur par défaut est 5.

Exemple

La macro Microsoft Visual Basic pour Applications (VBA) suivante indique comment utiliser la propriété FreeformDrawingPrecision pour afficher le paramètre actuel de la précision de dessin de forme libre dans la fenêtre Exécution. Il montre également comment obtenir un objet ApplicationSettings à partir de l’objet Application Visio.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.