Compartir a través de


DocumentBase.DocumentTheme (Propiedad)

Obtiene el tema de Microsoft Office que se aplica al documento.

Espacio de nombres:  Microsoft.Office.Tools.Word
Ensamblado:  Microsoft.Office.Tools.Word.v4.0.Utilities (en Microsoft.Office.Tools.Word.v4.0.Utilities.dll)

Sintaxis

'Declaración
Public ReadOnly Property DocumentTheme As OfficeTheme
public OfficeTheme DocumentTheme { get; }

Valor de propiedad

Tipo: Microsoft.Office.Core.OfficeTheme
Objeto Microsoft.Office.Core.OfficeTheme que representa el tema de Microsoft Office que se aplica al documento.

Comentarios

Use el método ApplyDocumentTheme para aplicar un tema de Microsoft Office al documento.

Ejemplos

En el ejemplo de código siguiente se recuperan el tema del documento actual y su combinación de fuentes correspondiente.A continuación, se recuperan y se muestran los nombres de las fuentes principal y secundaria de la cara de la fuente latina en un cuadro de mensaje.Para usar este ejemplo, ejecútelo desde la clase ThisDocument en un proyecto de nivel de documento.

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);
}

Seguridad de .NET Framework

Vea también

Referencia

DocumentBase Clase

Microsoft.Office.Tools.Word (Espacio de nombres)