更改Bold属性

Question

我在本守则中有以下问题：

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

这里我的问题是：“RichTextBox1.Font.Bold= False”(这个属性是ReadOnly)，我需要一些帮助。

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