DocumentBase.DocumentTheme 屬性

取得套用至文件的 Microsoft Office 佈景主題。

命名空間：  Microsoft.Office.Tools.Word
組件：  Microsoft.Office.Tools.Word.v4.0.Utilities (在 Microsoft.Office.Tools.Word.v4.0.Utilities.dll 中)

語法

'宣告
Public ReadOnly Property DocumentTheme As OfficeTheme
    Get

public OfficeTheme DocumentTheme { get; }

屬性值

型別：Microsoft.Office.Core.OfficeTheme
Microsoft.Office.Core.OfficeTheme 物件，表示套用至文件的 Microsoft Office 佈景主題。

備註

您可以使用 ApplyDocumentTheme 方法，將 Microsoft Office 佈景主題套用至文件。

範例

下列程式碼範例會擷取目前的文件佈景主題及其對應的字型配置。 這個範例接著會擷取拉丁字體主要字型及次要字型的名稱，並將其顯示於訊息方塊中。 若要使用這個範例，請在文件層級專案中的 ThisDocument 類別執行。

Private Sub GetDocumentTheme()
    Dim theme As Office.OfficeTheme = Me.DocumentTheme
    Dim fontScheme As Office.ThemeFontScheme = theme.ThemeFontScheme
    Dim majorFont As Office.ThemeFont = fontScheme.MajorFont.Item( _
        Microsoft.Office.Core.MsoFontLanguageIndex.msoThemeLatin)
    Dim minorFont As Office.ThemeFont = fontScheme.MinorFont.Item( _
        Microsoft.Office.Core.MsoFontLanguageIndex.msoThemeLatin)
    MessageBox.Show("Name of major font in current document theme: " _
                    + majorFont.Name)
    MessageBox.Show("Name of minor font in current document theme: " _
                    + minorFont.Name)
End Sub

private void GetDocumentTheme()
{
    Office.OfficeTheme theme = this.DocumentTheme;            
    Office.ThemeFontScheme fontScheme = theme.ThemeFontScheme;            
    Office.ThemeFont majorFont = fontScheme.MajorFont.Item(
        Office.MsoFontLanguageIndex.msoThemeLatin);
    Office.ThemeFont minorFont = fontScheme.MinorFont.Item(
        Office.MsoFontLanguageIndex.msoThemeLatin);
    MessageBox.Show("Name of major font in current document theme: "
        + majorFont.Name);
    MessageBox.Show("Name of minor font in current document theme: "
        + minorFont.Name);
}

.NET Framework 安全性

• 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊，請參閱從部分受信任程式碼使用程式庫。

請參閱

參考

DocumentBase 類別

Microsoft.Office.Tools.Word 命名空間