InvisibleApp. DialogFont-Eigenschaft (Visio)InvisibleApp.DialogFont property (Visio)

Gibt Informationen zu den Schriftarten zurück, die in den Dialogfeldern von Microsoft Visio verwendet werden.Returns information about the fonts that Microsoft Visio uses in its dialog boxes. Schreibgeschützt.Read-only.

SyntaxSyntax

Ausdruck. DialogFontexpression.DialogFont

Ausdruck Eine Variable, die ein InvisibleApp -Objekt darstellt.expression A variable that represents an InvisibleApp object.

RückgabewertReturn value

IFontDispIFontDisp

BemerkungenRemarks

Verwenden Sie diese Eigenschaft, um Ihre Dialogfelder in derselben Schriftart wie die Visio-Dialogfelder anzuzeigen.You can use this property to display your dialog boxes in the same font as the Visio dialog boxes.

COM (Component Object Model) stellt eine Standardimplementierung eines Font-Objekts mit der IFontDisp -Schnittstelle über der zugrunde liegenden Systemschriftart Unterstützung bereit.COM (Component Object Model) provides a standard implementation of a font object with the IFontDisp interface on top of the underlying system font support. Die IFontDisp -Schnittstelle macht die Eigenschaften eines Font-Objekts verfügbar und wird in der stdole-Typbibliothek als stdFont -Objekt implementiert, das in Microsoft Visual Basic erstellt werden kann.The IFontDisp interface exposes a font object's properties and is implemented in the stdole type library as an StdFont object that can be created within Microsoft Visual Basic. Auf die stdole-Typbibliothek wird automatisch von allen Visual Basic-Projekten in Visio verwiesen.The stdole type library is automatically referenced from all Visual Basic projects in Visio.

So rufen Sie Informationen zum StdFont-Objekt ab, das die IFontDisp-Schnittstelle unterstütztTo get information about the StdFont object that supports the IFontDisp interface

  1. Klicken Sie auf der Registerkarte Entwicklertools in der Gruppe Code auf Visual Basic.In the Code group on the Developer tab, choose Visual Basic.

  2. Klicken Sie im Menü Ansicht auf Objekt Browser.On the View menu, choose Object Browser.

  3. Wählen Sie in der Liste Projekt/Bibliothek die Option stdoleaus.In the Project/Library list, choose stdole.

  4. Überprüfen Sie unter Klassen die Klasse mit dem Namen StdFont.Under Classes, examine the class named StdFont.

BeispielExample

Im folgenden Beispielcode wird gezeigt, wie Sie einen Verweis auf ein stdFont -Objekt abrufen, das Informationen über die Anwendungs Schriftarten vermittelt und wie diese Informationen im Direktfenster gedruckt werden.The following sample code shows how to get a reference to an StdFont object that conveys information about the application fonts, and how to print that information to the Immediate window.

 
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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.