Delete forbidden characters from your string
Delete forbidden characters from your string
Rate Delete forbidden characters from your string
(2(2 Vote))
strNotAllowed = ".,\/*+-~¸¨""""#$%&()=?!'ߤ×÷:;><" 'these are characters we 'don't want in the string
MyString = Trim(Text1.Text)
For n = 1 To Len(MyString)
For m = 1 To Len(strNotAllowed)
If Mid(MyString, n, 1) = Mid(strNotAllowed, m, 1) Then
MyString = Replace(MyString, Mid(strNotAllowed, m, 1), "", 1, -1, vbTextCompare)
End If
Next m
Next n
MyString = Trim(MyString)
Delete forbidden characters from your string Comments
No comments yet — be the first to post one!
Post a Comment