Strip String Function

Strip values from string
Function StripString

syntax

String$ = StripString( Arg1$, Arg2$)

Arguments

Arg1$ : String that you want to strip

Arg2$ : Array of string, contains the values that you want to remove from
Arg1$

Return value : String


Example

sFaxNumber$ = "(32) 16/44.54.63"
Redim argu(8) As String
argu(0) = "/"
argu(1) = "."
argu(2) = ","
argu(3) = "-"
argu(4) = "+"
argu(5) = "("
argu(6) = ")"
argu(7) = " "
argu(8) = ";"
sFaxNumber$ = StripString( sFaxNumber$, argu)
print sFaxNumber$ ' result : 3216445463


Function StripString( StripValue As String, StripArgument() As String)
tmp$ = StripValue
Length% = Len(tmp$)
For i% = Lbound( StripArgument ) To Ubound( StripArgument )
While (Instr( 1, tmp$, StripArgument(i%)) > 0)
place% = Instr( 1, tmp$, StripArgument(i%))
tmpsuffix$ = Left$(tmp$, (place% - 1) )
tmpprefix$ = Mid$(tmp$, (place%+1), (Length% - place%) )
tmp$ = tmpsuffix$ & tmpprefix$
Wend
Next
StripString = tmp$
End Function
This was first published in November 2000

Dig deeper on Domino Resources - Part 6

0 comments

Oldest 

Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:

-ADS BY GOOGLE

SearchWinIT

Search400

  • iSeries tutorials

    Search400.com's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...

SearchEnterpriseLinux

SearchVirtualDataCentre.co.UK

Close