by David Wolever (1 Submission)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 1st February 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)
This code will take a string (1;2;3;4;) and seperate each item, and place them in a list box (1,2,3,4).
'you can replace the ; with what ever you want the seperator to be
If Right(Left(Text1, a), 1) = ";" Then
List1.AddItem Replace(Right(Left(Text1, a - 1), a - eol), ";", "")
eol = a
End If
Next a
No comments have been posted about This code will take a string (1;2;3;4;) and seperate each item, and place them in a list box (1,2,3. Why not be the first to post a comment about This code will take a string (1;2;3;4;) and seperate each item, and place them in a list box (1,2,3.