Jump to content
NelsonBN

[Resolvido] Itens selecionados numa ListBox

Recommended Posts

NelsonBN

Boas...

Estou a tentar fazer um programa em que tenho uma ListBox. E esta ListBox tem a opção SelectionMode = MultiSimple. Isto para poder seleccionar vários itens da listebox

O problema é quando seleccione os itens da lisbox para aparecer por exemplo numa textbox, só me aparece sempre o primeiro iten que esta seleccionado.

alguém me sabe dizer como obtenho todos os itens seleccionados na lisbox?

obrigado

Share this post


Link to post
Share on other sites
jpaulino

Sempre que seleccionas um item tens de percorrer a lista, juntar todos os items seleccionados numa variável e no final mostrar na tua TextBox.

Podes criar uma função para simplificar.

Share this post


Link to post
Share on other sites
EneMy

Ola NelsonBN.

Tente este codigo:

Dim i As Integer
'Percorre por todos itens do listbox
For i = 0 To List1.ListCount - 1
'Verifica se o item do listbox esta selecionado
If List1.Selected(i) Then
'Se estiver selecionado escreve o resultado no TextBox
Text1.Text = Text1.Text & List1.List(i) & vbNewLine
End If
Next

Teste ai qualquer problema e so falar  :)

Share this post


Link to post
Share on other sites
jpaulino

Por falta de informação do utilizador e por existirem respostas aceitáveis à pergunta efectuada, esta questão foi marcada como resolvida.

Jorge Paulino

Share this post


Link to post
Share on other sites
jumoreira

Ola,

Esse é meu primeiro acesso.

Eu apliquei esse codigo no meu projeto e deu certo, porém queria saber se é possivel fazer com que o conteudo da listbox mostrasse em um textbox de um outro formulário( frmfinal).. :dontgetit:

Tks!!

Share this post


Link to post
Share on other sites
jpaulino

Ola,

Esse é meu primeiro acesso.

Eu apliquei esse codigo no meu projeto e deu certo, porém queria saber se é possivel fazer com que o conteudo da listbox mostrasse em um textbox de um outro formulário( frmfinal).. :dontgetit:

Tks!!

Olá,

Explica lá melhor o que queres e se possível mostra uma imagem ou o ficheiro.

Share this post


Link to post
Share on other sites
jumoreira

Atraves desse codigo que foi publicado nas mensagens anteriores:

Dim i As Integer

'Percorre por todos itens do listbox

For i = 0 To ListS.ListCount - 1

'Verifica se o item do listbox esta selecionado

If ListS.Selected(i) Then

'Se estiver selecionado escreve o resultado no TextBox

txt1.Text = txt1.Text & ListS.List(i) & vbNewLine

Eu consegui fazer com que qualquer item selecionado pela Listbox(ListS), mostrasse na textbox(txt1) do formulário.

Porem, queria saber como eu faço para este item selecionado da ListBpx(ListS) mostrasse em um textbox de um outro formulario.

Pois estou criando um programa para a empresa que trabalho, e o funcionário terá que escolher varios itens de 10 formulário que criei, e no final queria colocar uma opção para que ele visualizasse todos os itens que ele selecionou em um formulário final. Como se fosse um cadastro.

Tks

Share this post


Link to post
Share on other sites
gilson da silva rocha

talvez posso ajudar:

nomedooutroformulario.textbox que vai receber o conteúdo da listbox(listS)

coloque o nome do formulário e verifique os objetos contidos nele. Vai achar a caixa de texto que vc quer....

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.