Visual Basic 6.0

Load StringTable from a StringBuilder

Demonstrates how to load a StringTable from the text contained in a Chilkat StringBuilder object. Visual Basic 6.0

Dim success As Long
success = 0

Dim strTab As New ChilkatStringTable
Dim sb As New ChilkatStringBuilder

success = sb.Append("This is line 1" & vbCrLf)
success = sb.Append("An empty line follows..." & vbCrLf)
success = sb.Append(vbCrLf)
success = sb.Append("This is line 4" & vbCrLf)

success = strTab.AppendFromSb(sb)

Dim i As Long
i = 0
Dim numStrings As Long
numStrings = strTab.Count
Do While i < numStrings
    Debug.Print i & ": " & strTab.StringAt(i)
    i = i + 1
Loop