LISTBOX - TRAZER ITENS SELECIONADOS

NICOLLAS2 09/09/2010 15:45:49
#352535
tenho um listbox com a opcao multiselect = true

como faco para pegar estas informacoes selecionadas para usar num select?

Dim i As Integer
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then [ô] se estiver selecionado
MsgBox (List1.Text) [ô] ??????? nao sei como colocar nesta linha
End If
Next i
GERARDA 09/09/2010 15:57:51
#352537 Resposta escolhida
Dim i As Integer
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then [ô] se estiver selecionado
MsgBox (List1.list(i)) [ô] ??????? nao sei como colocar nesta linha
End If
Next i

vc tambem pode criar uma varialvel e ler todos os items selecionados

Dim qualquercoisa As String

Dim i As Integer
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then [ô] se estiver selecionado
qualquercoisa = qualquercoisa & [Ô] - [Ô] & List1.List(i) [ô] ??????? nao sei como colocar nesta linha
End If
Next i
[ô]e depois mostra
MsgBox qualquercoisa
NICOLLAS2 09/09/2010 16:03:35
#352539
cara, acreita que eu ja tinha feito isso e nao me toquei que tinha dado certo...
valeu assim mesmo.
Tópico encerrado , respostas não são mais permitidas
Voltar