Visual Basic 6.0

StringBuilder GetAfterFinal

Demonstrates the StringBuilder.GetAfterFinal method.

The GetBefore method was added in Chilkat v9.5.0.77

Visual Basic 6.0

Dim success As Long
success = 0

Dim sb As New ChilkatStringBuilder
success = sb.Append("111--222--333--444")

' The GetAfterFinal method returns the contents of the string after the final occurrence of
' the marker string.  If the remove flag is 1, then both the returned string AND
' the marker are removed.

' If the marker is not found, then the entire string is returned and the sb is cleared.
Dim removeFlag As Long
removeFlag = 1
Dim marker As String
marker = "--"
Dim substr As String
Do While (sb.Length > 0)
    substr = sb.GetAfterFinal(marker,removeFlag)
    Debug.Print "substr = " & substr & ", sb contains: " & sb.GetAsString()
Loop

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