Private Sub RichTextBox1_KeyPress(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.KeyPressEventArgs) Handles RichTextBox1.KeyPress
        If e.KeyChar = " "c Then
            Me.Focus()
            RichTextBox1.Focus()
        End If
    End Sub

Those people who think they know everything are a great annoyance to those of us who do - Isaac Asimov