vb.net - セミカラムで文字列を終了し、スペース VB.Net を追加する

Question

数値の配列を収集するために使用しているRichTextBoxがありますが、数値はセミコロンで終了する必要があります。セミコロンを入力した直後に自動的にスペースを作り、他の数字を続けて入力したい。私はこのコードを試しましたが、スペースを作成せず、代わりに文字列の先頭にカーソルを置きます:

Private Sub RichTextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles RichTextBox1.KeyPress
    If (Microsoft.VisualBasic.Asc(e.KeyChar) < 48) _
          Or (Microsoft.VisualBasic.Asc(e.KeyChar) > 57) Then
        e.Handled = True
    End If
    If (Microsoft.VisualBasic.Asc(e.KeyChar) = 8) Then
        e.Handled = False
    End If
    If (Microsoft.VisualBasic.Asc(e.KeyChar) = 59) Then
        e.Handled = False
    End If
    If (Microsoft.VisualBasic.Asc(e.KeyChar) = 45) Then
        e.Handled = False
    End If
    If (Microsoft.VisualBasic.Asc(e.KeyChar) = 59) Then
        RichTextBox1.Text += " "
        RichTextBox1.SelectionStart = RichTextBox1.TextLength
        RichTextBox1.SelectionLength = 0
    End If
End Sub

困っています。インターネットで検索しようとしましたが、成果がありませんでした