Propriété Application.DialogFont (Visio)

  • Article

Renvoie des informations sur les polices que Microsoft Visio utilise dans ses boîtes de dialogue. En lecture seule.

Syntaxe

expression. DialogFont

expressionUne variable qui représente un objetApplication.

Valeur renvoyée

IFontDisp

Remarques

Utilisez cette propriété pour afficher vos boîtes de dialogue dans la même police que les boîtes de dialogue Visio.

COM (Component Object Model) fournit une implémentation standard d'un objet Font avec l'interface IFontDisp au-dessus de la prise en charge de polices par le système sous-jacent. L’interface IFontDisp expose les propriétés d’un objet police et est implémentée dans la bibliothèque de types stdole en tant qu’objet StdFont qui peut être créé dans Microsoft Visual Basic. La bibliothèque de types stdole est automatiquement référencée à partir de tous les projets Visual Basic dans Visio.

Pour obtenir des informations à propos de l'objet StdFont qui prend en charge l'interface IFontDisp :

  1. Dans le groupe Code sous l’onglet Développeur , choisissez Visual Basic.

  2. Dans le menu Affichage , choisissez Explorateur d’objets.

  3. Dans la liste Projet/Bibliothèque , choisissez stdole.

  4. Sous Classes, examinez la classe nommée StdFont.

Exemple

L’exemple de code suivant montre comment obtenir une référence à un objet StdFont qui transmet des informations sur les polices d’application, et comment imprimer ces informations dans la fenêtre Exécution.

 
Sub DialogFont_Example() 
 
Dim objStdFont As StdFont 
Set objStdFont = Application.DialogFont 
 
 With objStdFont 
 
 Debug.Print .Bold 
 Debug.Print .CharSet 
 Debug.Print .Italic 
 Debug.Print .Name 
 Debug.Print .Size 
 Debug.Print .Strikethrough 
 Debug.Print .Underline 
 Debug.Print .Weight 
 
 End With 
 
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.