Поделиться через


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, применяемую к документу.

Заметки

Чтобы применить тему Microsoft Office к документу, следует использовать метод ApplyDocumentTheme.

Примеры

В приведенном ниже примере кода загружается текущая тема документа и соответствующая схема шрифтов. Затем в коде загружаются и отображаются в окне сообщения имена основного и дополнительного шрифтов для латиницы. Чтобы использовать этот пример, запустите его из класса 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 - пространство имен