在vb.net中更改字體名稱

，我有一個用於寫入文本的豐富文本框和一個用於字體名稱的組合框。我的字體組合框與此代碼：在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

但我不知道，如何改變富文本框的字體名稱。

來源

2013-08-16 user2169140

RichTextBox.Font = New Font(FontName.Text, 10, FontStyle.Regular)

來源

2013-08-16 09:45:51

你必須使用下面的代碼：

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

使其適應您的具體情況：與你的RichTextBox，「字體名稱」與您的組合框FontName，size與大小的給定項目替換RichTextBox1你想要（可能是當前的那個，也就是RichTextBox1.Font.Size）。

來源

2013-08-16 09:40:54 varocarbas

Font.Name是隻讀的，但Font不是。所以，我應該這樣做：

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

大小和樣式可以硬編碼的，或者可以從自己的組合框填滿。放入您使用的是用戶從下拉列表框在選擇任何事件驅動的子代碼（如改變的SelectedValue）

來源

2013-08-16 09:45:24

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-28 18:49:18

在vb.net中更改字體名稱

回答

相關問題