1

vb.net には、書き込みテキスト用のリッチ テキスト ボックスとフォント名用のコンボ ボックスがあります。私はこのコードでコンボボックスにフォントを追加しました:

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim ff As FontFamily
    For Each ff In System.Drawing.FontFamily.Families
        FontName.Items.Add(ff.Name)
    Next
End Sub

しかし、リッチテキストボックスのフォント名を変更する方法がわかりません。

4

4 に答える 4

5

以下のコードを使用する必要があります。

RichTextBox1.Font = New Font("Font Name", size)

特定の条件にRichTextBox1合わせてください: RichTextBox に置き換え、「フォント名」を ComboBox の指定された項目にFontName置き換え、size必要なサイズ (現在のもの、つまりRichTextBox1.Font.Size) に置き換えます。

于 2013-08-16T09:40:54.597 に答える
2

Font.Name は読み取り専用ですが、Font はそうではありません。だから私はこれをします:

TextBox1.Font = New Font(FontName.Text, 26.0, FontStyle.Regular)

サイズとスタイルは、ハードコーディングすることも、独自のコンボ ボックスから入力することもできます。そのコードを、コンボボックスから選択したユーザーに使用しているイベント駆動型サブシステムに配置します (たとえば、SelectedValue が変更されました)。

于 2013-08-16T09:45:24.827 に答える
2
RichTextBox.Font = New Font(FontName.Text, 10, FontStyle.Regular)
于 2013-08-16T09:45:51.337 に答える
0
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    Dim ff As FontFamily
    For Each ff In System.Drawing.FontFamily.Families
        FontName.Items.Add(ff.Name)
    Next

End Sub
于 2014-01-28T18:49:18.793 に答える