Removes all chars found in Chars_to_remove from String1
Function RemoveChars(String1, Chars_to_remove)
' Removes all chars found in Chars_to_remove from String1
NewStr = String1
For I = 1 To Len(Chars_to_remove)
NewStr = Replace(NewStr, Mid(Chars_to_remove, I, 1), "")
Next
RemoveChars = NewStr
End Function
' Removes all chars found in Chars_to_remove from String1
NewStr = String1
For I = 1 To Len(Chars_to_remove)
NewStr = Replace(NewStr, Mid(Chars_to_remove, I, 1), "")
Next
RemoveChars = NewStr
End Function
String1, Chars_to_remove
Views 4,263
Downloads 1,327
CodeID
DB ID