16,555
社区成员
发帖
与我相关
我的任务
分享
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
RichTextBox1.SelectionColor = Color.Red
RichTextBox1.SelectionFont = New Font("Ariel", 20, FontStyle.Bold or FontStyle.Italic or FontStyle.Strikeout or FontStyle.Underline )
End Sub