What am I doing wrong? [Resolved]

Just a simple find and replace... and I just can't get it to work! Ugh I know I'm doing something wrong....

VB Code:

Private Sub mnuChildFIndandReplace_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuChildFIndandReplace.Click
        'Show The Find And Replace Dialog
        Dim frmReplace As New frmReplace
        Me.AddOwnedForm(frmReplace)
        frmReplace.ShowDialog()
        CurrentToBe = frmReplace.txtReplaceThis.Text
        CurrentReplace = frmReplace.txtReplaceWith.Text
        Dim CharacterNumber As Integer = frmReplace.txtReplaceThis.Text.Length()
        If frmReplace.chkCase.Checked = False Then
            ReplaceWordLocation = txtBoxChild.Find(CurrentToBe, RichTextBoxFinds.None)
            txtBoxChild.Text.Remove(ReplaceWordLocation, CharacterNumber)
            txtBoxChild.Text.Insert(ReplaceWordLocation, CurrentReplace)
        ElseIf frmReplace.chkCase.Checked = True Then
            ReplaceWordLocation = txtBoxChild.Find(CurrentToBe, RichTextBoxFinds.MatchCase)
            txtBoxChild.Text.Remove(ReplaceWordLocation, CharacterNumber)
            txtBoxChild.Text.Insert(ReplaceWordLocation, CurrentReplace)
        End If
    End Sub

Is there a reason you're not using the built in Replace function?

Quote:

---

Originally posted by Sheppe
Is there a reason you're not using the built in Replace function?

---

I tried it and it wouldn't work.....

instead of using txtBoxChild.Text.Replace( blabla , blabla )
try this :

VB Code:

txtBoxChild.Text = Replace( txtBoxChild.Text , "exsisting text " , " New Text " )

Quote:

---

Originally posted by dynamic_sysop
instead of using txtBoxChild.Text.Replace( blabla , blabla )
try this :

VB Code:

txtBoxChild.Text = Replace( txtBoxChild.Text , "exsisting text " , " New Text " )

---

Thanks that works!

I tried the replace function with the text box control and several other things and it just wouldn't work! bah.