Split string by a space

Question

I have one string that has two words in it:

Cat Dog

How can I split these up so I get:

Str1 = Cat and Str2 = Dog

Please note this is for VB6.

Answer 1

Use the Split function.

Dim output() As String
output = Split("Cat Dog", " ")

Would produce

output(0) = Cat
output(1) = Dog