• Home
 · 
• String Manipulation
 · 
• A Non-CapsSensetive Way To Find String One Inside The String Two And Replace It With String Three.

A Non-CapsSensetive Way To Find String One Inside The String Two And Replace It With String Three.

A Non-CapsSensetive Way To Find String One Inside The String Two And Replace It With String Three. I Submited This Code Because All The Other

Rate A Non-CapsSensetive Way To Find String One Inside The String Two And Replace It With String Three.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Dim I As Byte
I = 1
Dim LeftPart
Do While True
I = InStr(1, UCase$(Entire), UCase$(Word))
If I = 0 Then
Exit Do
Else
LeftPart = Left(Entire, I - 1)
Entire = LeftPart & NewWord & Right(Entire, Len(Entire) - Len(Word) - Len(LeftPart))
End If
Loop
Text1.Text = Entire
End Sub

Private Sub Command1_Click()
RemoveString "String Two", "String One", "String Three"
End Sub