تغییرات فونت ریچ باکس

[sysman_20]

با سلام
من می خواستم Buld Or Italic بودن ریچ باکس را بدون استفتده از فونت دیالوگ تغییر دهم.
چند روش را امتحان کردم اما جواب نداد.
لطفا مرا راهنمایی کنید.:گیج:

[Qermezkon]

Try
If e.Control And e.KeyValue = 221 Then
SpinEdit1.Value += 1
ElseIf e.Control And e.KeyValue = 219 Then
SpinEdit1.Value -= 1
ElseIf e.Control And e.KeyValue = 66 Then
F = New Font(txtdesc.SelectionFont.FontFamily.Name, txtdesc.SelectionFont.Size, FontStyle.Bold)
txtdesc.SelectionFont = F
ElseIf e.Control And e.KeyValue = 73 Then
F = New Font(txtdesc.SelectionFont.FontFamily.Name, txtdesc.SelectionFont.Size, FontStyle.Italic)
txtdesc.SelectionFont = F
ElseIf e.Control And e.KeyValue = 85 Then
F = New Font(txtdesc.SelectionFont.FontFamily.Name, txtdesc.SelectionFont.Size, FontStyle.Underline)
txtdesc.SelectionFont = F
ElseIf Not e.Control Then
F = New Font(FontEdit1.Text, SpinEdit1.Value, FontStyle.Regular)
txtdesc.SelectionFont = F
txtdesc.SelectionColor = ForeColor.Color
End If
Catch ex As Exception

End Try

[Qermezkon]

زحمت تبديل به سي پارپ رو خودت بكش.

[hasan_esfahan]

richTextBox1.Font.Bold = true;
richTextBox1.Font.Underline = true;