VB Forum / General / January 2005

Dim StringToSplit As String
Dim MyArray() As String
StringToSplit = "Zero,One,Two,Three,Four,Five"
MyArray = Split(StringToSplit, ",")

MyArray now has "Zero" at element 0, "One" at element 1, "Two" at
element 2, etc.

Rick - MVP

Be sure to use an undimensioned array.

   Dim s() As String
   Dim str As String
   Dim i As Integer
   str = "This,is,a,test,."
   s = Split(str, ",")
   For i = LBound(s) To UBound(s)
       Debug.Print s(i)
   Next

Jim Edgar

Don't set the size of the array to receive the return value from Split -
Split will take care of dimensioning it correctly ...

dim a(0 to 3) as string  ' wrong
dim a() as string  'right

a()=split(whatever, somedelimiter)

[FRED LUGAR] I am using the Split function to split a string.  I have an
array equal to the function to catch the substrings.  When I run the
program, I get an error, "Can't assign to array."

Could someone just post a couple lines of VB6 code to show me how this
works?

[HOSHI PATRICIA FRIEDMAN] Boy, I wish I HAD the Split keyword, because I'm
only using VB4, so I can't help you.  You could check out your
documentation, though.