Visual Basic 6.0

StringBuilder SetNth

Demonstrates the SetNth method. Visual Basic 6.0

' The SetNth method is handy for setting a part of a delimited string.
' For example:

Dim sb As New ChilkatStringBuilder
success = sb.Append("red,blue,""green,purple"",,yellow")

Dim delimiterChar As String
delimiterChar = ","
Dim exceptDoubleQuoted As Long
exceptDoubleQuoted = 1
Dim exceptEscaped As Long
exceptEscaped = 1

success = sb.SetNth(2,"magenta",delimiterChar,exceptDoubleQuoted,exceptEscaped)
' Prints "red,blue,magenta,,yellow"
Debug.Print sb.GetAsString()

success = sb.SetNth(3,"orange",delimiterChar,exceptDoubleQuoted,exceptEscaped)
' Prints "red,blue,magenta,orange,yellow"
Debug.Print sb.GetAsString()

' What happens if we start with an empty string?
sb.Clear 

success = sb.SetNth(2,"apple",delimiterChar,exceptDoubleQuoted,exceptEscaped)
' Prints ",,apple"
Debug.Print sb.GetAsString()

success = sb.SetNth(0,"orange",delimiterChar,exceptDoubleQuoted,exceptEscaped)
' Prints "orange,,apple"
Debug.Print sb.GetAsString()

success = sb.SetNth(1,"banana",delimiterChar,exceptDoubleQuoted,exceptEscaped)
' Prints "orange,banana,apple"
Debug.Print sb.GetAsString()