
Deleting characthers in a string
Quote:
>Is it possible to delete a specific characther in i string?
>e.g
>remove all "x" in this string "hdgxjsfhx"
Dim sStr As String
Dim iPos As Integer
sStr = "hdgxjsfhx"
iPos = InStr(sStr, "x")
While iPos
sStr = Left$(sStr, iPos - 1) & Mid$(sStr, iPos + 1)
iPos = InStr(sStr, "x")
Wend
Lee Weiner
"The difference between a wise man and a fool
is that the fool never learns from his mistakes."