Visio) (Application.DialogFont 屬性

  • 發行項

會傳回 Microsoft Visio 在對話方塊中所使用字型的詳細資訊。 唯讀。

語法

運算式。DialogFont

expression 代表 Application 物件的變數。

傳回值

IFontDisp

註解

使用此屬性，以與 Visio 對話方塊相同的字型顯示對話方塊。

COM (元件物件模型) 在基礎系統字型支援之上，提供具有 IFontDisp 介面的字型物件標準實作。 IFontDisp介面會公開字型物件的屬性，並在 stdole 類型程式庫中實作為可在 Microsoft Visual Basic 中建立的StdFont物件。 stdole 類型程式庫會自動從 Visio 中的所有 Visual Basic 專案參考。

若要取得支援 IFontDisp 介面的 StdFont 物件的詳細資訊：

  1. 在 [開發人員] 索引標籤的 [程式碼] 群組中，選擇[Visual Basic]。

  2. 在 [ 檢視] 功能表上，選擇 [ 物件瀏覽器]。

  3. 在 [ 專案/程式庫] 清單中，選擇 [stdole]。

  4. 在 [類別] 之下，檢查名為 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 支援與意見反應。