[size=2][color=#0000ff]Private[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub[/color][/size][size=2] split()
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] myCSV [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String
[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] myArray() [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String
[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] i
myCSV = "One , two , three, four , five"
myArray = myCSV.Split(",") [/size][size=2][color=#008000]' Delimeter[/color][/size]
[size=2][color=#0000ff]For[/color][/size][size=2] i = 0 [/size][size=2][color=#0000ff]To[/color][/size][size=2] 4
[/size][size=2][color=#0000ff]Me[/color][/size][size=2].ListBox1.Items.Add(myArray(i))
[/size][size=2][color=#0000ff]Next
[/color][/size][size=2][/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub
[/color][/size]