B4X

StringBuilder GetBefore

Demonstrates the StringBuilder.GetBefore method.

The GetBefore method was added in Chilkat v9.5.0.77

B4X

Dim success As Boolean = False

Dim sb As ChilkatStringBuilder
sb.Initialize
success = sb.Append("www.chilkatsoft.com")

'  The GetBefore method returns the contents of the string up to but not including
'  the marker string.  If the remove flag is True, then both the returned string AND
'  the marker are removed.
Dim removeFlag As Boolean = False
Dim marker As String = "."
Dim substr As String = sb.GetBefore(marker, removeFlag)
Log("substr = " & substr)
Log("sb contains: " & sb.GetAsString)

'  Output:
'  substr = www
'  sb contains: www.chilkatsoft.com

removeFlag = True
substr = sb.GetBefore(marker, removeFlag)
Log("substr = " & substr)
Log("sb contains: " & sb.GetAsString)

'  Output:
'  substr = www
'  sb contains: chilkatsoft.com

'  If the marker is not found, and the removeFlag is True,
'  then the entire string is returned and the sb is cleared.
'  For example:
sb.Clear
sb.Append("111--222--333--444")
marker = "--"
removeFlag = True
Do While (sb.Length > 0)
    substr = sb.GetBefore(marker, removeFlag)
    Log("substr = " & substr & ", sb contains: " & sb.GetAsString)
Loop

'  Output is:
'  substr = 111, sb contains: 222--333--444
'  substr = 222, sb contains: 333--444
'  substr = 333, sb contains: 444
'  substr = 444, sb contains: