by Jason Jaskolka (1 Submission)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 2nd October 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Replaces a string (oldw) with desired new string (neww)
STRL = InStr(STRX, oldw)
Do Until STRL = 0
Mid(STRX, STRL, 1) = neww
STRL = InStr(STRX, oldw)
Loop
End Function
STRX = 'source where to replace string such as text1.text
'oldw = original string
'neww = what will replace oldw (original string)
Call checkchar(oldw, neww)