Make your own free website on Tripod.com
Parse String Using A Specific Delimiter

Author: Microsoft

You can split the string "Cats,Dogs,Horses,Birds" to the substrings "Cats", "Dogs", "Horses" and "Birds".
The code below use the function 'split' that available only in VB 6.0 and above.

Form Code

Private Sub Form_Load()
Dim strAnimals As String
Dim
iCounter As Integer
Dim
arrAnimals() As String

strAnimals = "Cats,Dogs,Horses,Birds"
'replace the "," below with your delimiter
arrAnimals = Split(strAnimals, ",")

For iCounter = LBound(arrAnimals) To UBound(arrAnimals)
MsgBox arrAnimals(iCounter)
Next

End Sub

Go Back