PROBLEMAS COM QUEBRA DE LINHA EM TEXTBOX
Galera, primeiramente boa tarde a todos!
Então, meu problema é o seguinte:
Estou tentando fazer uma espécie de verificador de dados em vb, porém quero que quebre a linha na hora da saida de texto direto ao input. Um exemplo do meu problema:
Com a opção Multline setada em true, consigo deixar o texto assim na textbox1:
JOAO
JONATHAN
RICARDO
LEONARDO
Porém na hora que clico em começar o processo, o software joga na input o seguinte:
JOAOJONATHANRICARDOLEONARDO
E gostaria que fosse jogado de uma em uma, ou seja, uma linha uma palavra verificada.
Sou iniciante em vb, e tenho varias duvidas ainda rs... Porém gosto de aprender por min mesmo, mais essa quebra de linha está sem solução. =/
Obrigado a todos
Então, meu problema é o seguinte:
Estou tentando fazer uma espécie de verificador de dados em vb, porém quero que quebre a linha na hora da saida de texto direto ao input. Um exemplo do meu problema:
Com a opção Multline setada em true, consigo deixar o texto assim na textbox1:
JOAO
JONATHAN
RICARDO
LEONARDO
Porém na hora que clico em começar o processo, o software joga na input o seguinte:
JOAOJONATHANRICARDOLEONARDO
E gostaria que fosse jogado de uma em uma, ou seja, uma linha uma palavra verificada.
Sou iniciante em vb, e tenho varias duvidas ainda rs... Porém gosto de aprender por min mesmo, mais essa quebra de linha está sem solução. =/
Obrigado a todos
tenta isso
Dim Linhas() As String
Linha = Split(Text1.Text,VbCrLf)
For F= 0 To Ubound(Linha)
input Linha(F)
Next F
Infelizmente não funcionou amigo =s
Eu escrevo o codigo a baixo da Sub do botão que desencadeia a rotina. Creio ser isso, mais tbm posso estar colocando errado...
Eu escrevo o codigo a baixo da Sub do botão que desencadeia a rotina. Creio ser isso, mais tbm posso estar colocando errado...
Eu não entendi esse negocio de Input .........
você quer ler a partir da textbox ou um arquivo de texto???
você quer ler a partir da textbox ou um arquivo de texto???
Quero que a partir da textbox (com a bendita quebra de linha) mande para outra textbox com o comando .SetAttribute([Ô]value[Ô], TextBox1.Text) Ou seja, o que eu digito na textbox1 eu quero que vá para a outra textbox2, porém com quebra de linhas, como expliquei no primeiro post.
eu agora fiquei meio confuso, pois meu código funciona, ou seja ele pega a textbox com multiline true e separa por linha
veja o exemplo usando o msgbox
Private Sub Command1_Click()
Dim Linhas() As String
Linha = Split(Text1.Text, vbCrLf)
For F = 0 To UBound(Linha)
MsgBox Linha(F)
Next F
End Sub
repara que serão exibidas, uma linha de cada vez
se é apenas pra copiar o valor de uma text para outra, batsa deixar a text2 com o multiline = true e copiar assim
Text2.Text = Text1.Text
só isso
veja o exemplo usando o msgbox
Private Sub Command1_Click()
Dim Linhas() As String
Linha = Split(Text1.Text, vbCrLf)
For F = 0 To UBound(Linha)
MsgBox Linha(F)
Next F
End Sub
repara que serão exibidas, uma linha de cada vez
se é apenas pra copiar o valor de uma text para outra, batsa deixar a text2 com o multiline = true e copiar assim
Text2.Text = Text1.Text
só isso
Faça seu login para responder