VB - Passar texto para variáveis

[hugoesb]

Quero usar um objeto tipo textbox ou richtextbox para que seja digitado um texto e separar este texto em variáveis. Desta forma:

TEXTO:

Abrir

Arquivo

mudar fonte

Fechar

Quero jogar este texto em um array:

Myarrey(1) = Abrir

Myarrey(2) = Arquivo

Myarrey(3) = mudar fonte

Myarrey(4) = Fechar

Alguma sugestão?

[fariajp]

Dá uma olhada no help da função Split. Ela monta um array a partir de uma string de entrada e um delimitador.

Por exemplo:

Dim a() as String

Sub Main()

a = Split("Hello world", " ")

End Sub

--- a(0) = "Hello"

--- a(1) = "world"

No seu caso, a entrada seria o conteúdo do textbox e o delimitador vbCr (ou vbCrLf, não tenho um VB aqui para testar)

[hugoesb]

Funcionou direitinho

myarray() = Split(rtb.Text, Chr(13))

Obrigado