Как перейти на нужную строку в RichTextBox? - Visual Basic .NET

    ' RowIndex - номер строки с ноля с учетом переносов
    Public Sub SetCaretToRow(ByVal RowIndex As Integer, ByVal RTB As RichTextBox)
        Dim PosInd As Integer
        PosInd = RTB.GetFirstCharIndexFromLine(RowIndex) 
        If PosInd >= 0 Then
            RTB.Select(PosInd, 0)
            RTB.Focus()
        Else
            ' нет такой строки
        End If
    End Sub