Ir para o conteúdo
tabarra

Listbox - ajuda por favor

Mensagens Recomendadas

tabarra    0
tabarra

então, eu estou tentando carregar o conteúdo de uma textbox multiline para dentro de uma listbox

se fosse de um arquivo o comando seria:

    Dim MyString As String
    On Error Resume Next
    Open Directory$ For Input As #1
    While Not EOF(1)
        Input #1, MyString$
        DoEvents
        TheList.AddItem MyString$
    Wend
    Close #1

como ficaria o comandoo para por tudo que está no text3.text dentro da list2 ?

agradecido

(com urgência por favor)

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
jpaulino    106
jpaulino

Podes fazer assim:

Dim str() As String
Dim x As Integer
str = Split(Me.Text1.Text, vbNewLine)
For x = 0 To UBound(str)
   Me.List1.AddItem str(x)
Next x

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade