更改粗体属性

时间:2013-08-10 16:03:44

标签: vb.net-2010

我在此代码中遇到此问题:

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

这里我的问题:“RichTextBox1.Font.Bold = False”(此属性为ReadOnly),  我需要一些帮助。

1 个答案:

答案 0 :(得分:2)

这是一个简单的例子:

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