String Analsys

You cannot do exactly that in VB6, but you can do this:

Dim NewWord As String
Dim Words() As String

NewWord = "strong|network|lineup"
Words = Split(NewWord, "|")

' returns:
' Words(0) = "strong"
' Words(1) = "network"
' Words(2) = "lineup"