Question : VB.NET - Rich Text Box force upper case

How would I set a rich text box so that when user type, it's in upper case?  I can do it for a regular textbox, but having issue with a rich text box.

Example for textbox:  Me.TextBox1.CharacterCasing = CharacterCasing.Upper

Any example for rich text box?

Answer : VB.NET - Rich Text Box force upper case

Sorry i posted code in C#. Keypress is the best way of controlling user input in textboxes (Richtext or normal). Here is the VB code, please try

Private Sub RichTextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles RichTextBox1.KeyPress
        e.KeyChar = Char.ToUpper(e.KeyChar)
    End Sub