會傳回 Microsoft Visio 在對話方塊中所使用字型的詳細資訊。 唯讀。
語法
運算式。DialogFont
expression 代表 Application 物件的變數。
傳回值
IFontDisp
註解
使用此屬性以與 Visio 對話方塊相同的字型顯示對話方塊。
COM (元件物件模型) 提供字型物件的標準實作，在基礎系統字型支援之上具有 IFontDisp 介面。 IFontDisp 介面會公開字型物件的屬性，並會在 stdole 型別程式庫中實作為可在 Microsoft Visual Basic 內建立的 StdFont 物件。 系統會自動從 Visio 中的所有 Visual Basic 專案參照 stdole 型別程式庫。
若要取得支援 IFontDisp 介面的 StdFont 物件的詳細資訊：
在 [開發人員] 索引標籤的 [程式碼] 群組中，選擇 [Visual Basic]。
在 [檢視 ] 功能表上，選擇 [物件瀏覽器]。
在 [專案/文件庫 ] 清單中，選擇 [標準]。
在 [類別] 之下，檢查名為 StdFont 的類別。
範例
以下示例程式碼示範如何取得 StdFont 物件的參考，以傳達應用程式字型的相關資訊，以及如何將該資訊列印到 [立即] 視窗。
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
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。