[RESOLVED] Need help to split text!

For example I have a text like this:

Quote:

---

Text1.Text = "Visual.Basic"

---

How can I split this text to two TextBox'es like this:

Quote:

---

Text2.Text = "Visual"
Text3.Text = "Basic"

---

As you can see I want use "." like spliter mark.

Here

Code:

---

dim lines() as string
lines=split("Visual.Basic",".")
text2=lines(0)
text2=lines(1)

---

Thanks! You are very helpful but then I try Rate your post I'm geting this "You must spread some Reputation around before giving it to Mxjerrett again." So sorry! :(

RESOLVED! :afrog: