フォントの追加

適切なフォントを使用するとドキュメントが引き立ちます。さまざまなフォントスタイルを使用してドキュメントを作成し、それぞれのテキストを異なるフォントスタイルで明確に表示できます。Word ドキュメントでさまざまなフォントを使用するには、次のコードを使用します。

Visual Basic
C#

Visual Basic

' テキストを多くのフォントで描画します
Dim font As New Font("Tahoma", 9)
Dim ifc As New InstalledFontCollection()
For Each ff As FontFamily In ifc.Families
        ' フォントを作成します
        Dim sample As Font = Nothing
        For Each fs As FontStyle In [Enum].GetValues(GetType(FontStyle))
                If ff.IsStyleAvailable(fs) Then
                        sample = New Font(ff.Name, 9, fs)
                        Exit For
                End If
        Next
        If sample Is Nothing Then
                Continue For
        End If

        ' フォントを表示します
        C1Word.AddParagraph(ff.Name, font, Color.Black)
        C1Word.AddParagraph("The quick brown fox jumped over the lazy dog. 1234567890!", sample, Color.Black)
        sample.Dispose()
Next

// テキストを多くのフォントで描画します
Font font = new Font("Tahoma", 9);
InstalledFontCollection ifc = new InstalledFontCollection();
foreach (FontFamily ff in ifc.Families)
{
        // フォントを作成します
        Font sample = null;
        foreach (FontStyle fs in Enum.GetValues(typeof(FontStyle)))
        {
                if (ff.IsStyleAvailable(fs))
                {
                        sample = new Font(ff.Name, 9, fs);
                        break;
                }
        }
        if (sample == null) continue;

        // フォントを表示します
        C1Word.AddParagraph(ff.Name, font, Color.Black);
        C1Word.AddParagraph("The quick brown fox jumped over the lazy dog. 1234567890!", sample, Color.Black);
        sample.Dispose();
}