vb.net-2010 - 太字のプロパティを変更する

Question

このコードには次の問題があります。

If RichTextBox1.Font.Bold = True Then
    RichTextBox1.Font.Bold = False
Else
   RichTextBox1.Font.Bold = True
End If

ここで私の問題：「RichTextBox1.Font.Bold = False」（このプロパティは読み取り専用です）、助けが必要です。

Answer 1

簡単な例を次に示します。

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    If RichTextBox1.Font.Bold = True Then
        RichTextBox1.Font = New Font(RichTextBox1.Font, FontStyle.Regular)
    Else
        RichTextBox1.Font = New Font(RichTextBox1.Font, FontStyle.Bold)
    End If
End Sub