Looks decent close your " symbols tho to get a blank replacment with no space
You might also want to look at String.Concat & String.Substring
Concat will add multiple strings together seperated withonly a comma like:
vb Code:
String = String.Concat(oldString, NewString, NewString2)
'For instance, instead of
'messout = messout & " - " & messone
'you could do
messout = String.Concat(messout , " - ", messone)
Substring will grab parts from a string
vb Code:
' Starting point , number of chars
String= String.Substring(String.Length - 4, 4)
i dont know ur overall, but why even make a change if False, it looks to me like there would be nothing to remove to begin with?