String zoeken in RichTextBox en selecteren

[Timminator]

Hallo,

Ik ben een kladblok aan het maken in visual basic 2010. Alles werkt tot nu toe (opslaan, openen, kleur, font, zoeken en vervangen,...) maar bij de zoekfunctie zit ik een beetje vast :/

voor de zoekfunctie gebruik ik een formulier dat opent als ik op de menustrip 'Zoeken' druk.

Dit is de code die ik al heb:

Dim strZoekenNaar As String
        strZoekenNaar = txtZoekenNaar.Text

        If frmKladblok.rtbTekst.Text.Contains(strZoekenNaar) Then

        Else
            If MsgBox("Woord niet gevonden", MessageBoxButtons.OKCancel) = Windows.Forms.DialogResult.OK Then
                txtZoekenNaar.Text = String.Empty
                txtZoekenNaar.Select()
            End If
        End If

deze code vind volgens mij wel het woord dat ik heb ingegeven maar hij selecteert het niet ;(
weet iemand hoe ik dat kan oplossen?

bedankt.

 

[JoZ1]

Staat hier perfect uitgelegd: http://www.dotnetcurry.com/ShowArticle.aspx?ID=146

 

[Timminator]

Bedankt, het werkt nu ;D