Trova successivo in RichTextBox

Function GetAllMatchIndexes(ByVal searchString As String) As Integer()
    'Contiene tutti gli indici del primo carattere del match
    Dim results As New List(Of Integer)

    'Ottiene l'indice del primo carattere trovato
    Dim index As Integer = RichTextNote.Find(searchString, 0, RichTextBoxFinds.None)
    'Se non c'è nessuna corrispondenza ritorna nothing
    If (index = -1) Then
        Return Nothing
    End If

    'Altrimenti cerca ogni indice successivo e lo aggiunge ai risultati
    Do
        'Aggiunge l'indice alla lista dei risultati
        results.Add(index)
        'trova il nuovo indice
        index = RichTextNote.Find(searchString, index, RichTextBoxFinds.None)
    Loop While index <> -1

    'Ottiene il risultato
    Return results.ToArray()
End Function

                Regex regex= new Regex("stringa", RegexOptions.IgnoreCase);

                foreach (Match m in regex.Matches("testo di input"))
                {
                    int inizio = m.Index;
                    int lunghezza= m.Length;
                    
                    string valore = m.Value;
                }