Visio) (Document.GetThemeNamesU 方法

會傳回文件中所包含與地區設定無關的佈景主題名稱陣列。

語法

運算式。GetThemeNamesU (eType, NameArray () )

運算式 傳回 Document 物件的運算式。

參數

名稱 必要/選用 資料類型 描述
eType 必要 VisThemeTypes 佈景主題的類型,也就是 VisThemeTypes 列舉中的列舉值。 請參閱 「 備註 」 可能的值。
NameArray () 必要 字串 Out 參數。 由方法所傳回與地區設定無關的佈景主題名稱陣列。

傳回值

無

註解

如果是 eType 參數,請傳遞 VisThemeTypes 列舉中的值 (此列舉是在 Visio 型別程式庫中宣告)。

常數 值 描述
visThemeTypeColor 1 色彩佈景主題。
visThemeTypeEffect 2 效果佈景主題。

如果是 NameArray() Out 參數,請傳遞 String 類型的空白、無維度陣列。 Visio 傳回的陣列會填入文件中所包含與地區設定無關的佈景主題名稱。

若要取得文件中地區設定特定的佈景主題名稱,請使用 Document.GetThemeNames 方法。

注意事項

從 Microsoft Visio 2000 開始,您可以使用本機和通用名稱來參照 Visio 圖形、母片、文件、頁面、列、附加元件、儲存格、超連結、樣式、字型、母片快速鍵、UI 物件、佈景主題和圖層。 例如,當使用者命名圖形時,使用者是在指定本機名稱。從 Microsoft Office Visio 2003 開始,ShapeSheet 試算表僅顯示儲存格公式和值中的通用名稱。 (在舊版的 Visio 中,使用者介面中無法顯示通用名稱。) 身為開發人員,若您不想每次當地語系化解決方案時都變更名稱,可以在程式中使用通用名稱。

範例

下列Microsoft Visual Basic for Applications (VBA) 巨集 示範如何使用 GetThemeNamesU 方法取得使用中文件中與地區設定無關的佈景主題色彩和佈景主題效果名稱清單。 隨即會在 [立即] 視窗中列印清單。

Public Sub GetThemeNamesU_Example() 
 
    Dim astrNames() As String 
    Dim strThemeName As String 
    Dim intArrayCounter As Integer 
     
    ActiveDocument.GetThemeNamesU visThemeTypeColor, astrNames 
     
    For intArrayCounter = LBound(astrNames) To UBound(astrNames) 
        strThemeName = astrNames(intArrayCounter) 
        Debug.Print strThemeName 
    Next 
     
    Debug.Print "-------------------------------------------" 
     
    ActiveDocument.GetThemeNamesU visThemeTypeEffect, astrNames 
     
    For intArrayCounter = LBound(astrNames) To UBound(astrNames) 
        strThemeName = astrNames(intArrayCounter) 
        Debug.Print strThemeName 
    Next 
     
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。