Anonymous user
Strip a set of characters from a string: Difference between revisions
Strip a set of characters from a string (view source)
Revision as of 19:32, 17 July 2011
, 12 years ago{{header|Liberty BASIC}}
({{header|Liberty BASIC}}) |
|||
Line 212:
print( stripchars( "She was a soul stripper. She took my heart!", "aei" ) )</lang>
=={{header|Liberty BASIC}}==
<lang lb>
Print stripchars$("She was a soul stripper. She took my heart!", "aei", 1)
End
Function stripchars$(strip$, chars$, num)
For i = 1 To Len(strip$)
If Mid$(strip$, i, 1) <> Mid$(chars$, num, 1) Then
stripchars$ = (stripchars$ + Mid$(strip$, i, 1))
End If
Next i
If (num <= Len(chars$)) Then stripchars$ = stripchars$(stripchars$, chars$, (num + 1))
End Function
</lang>
=={{header|Nemerle}}==
<lang Nemerle>StripChars( text : string, remove : string ) : string
| |||