vb.net RichTextBox 跳置最後 [RichtextBox Jump to last]

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        RichTextBox1.SelectionStart = RichTextBox1.Text.Length - 1
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        RichTextBox1.HideSelection = False
    End Sub