quarta-feira, dezembro 19, 2018
Home » Office » MS Access » Passando dados de uma listbox pra outra listbox – Access 2003

Passando dados de uma listbox pra outra listbox – Access 2003

Bom dia, leitores.
Me deparei com um sisteminha em Access 2003 onde eu precisava passar os dados de uma listbox pra outra, após quebrar um pouco a cabeça, pelo fato do Access 2003 não ter a propriedade .List, fiz um for que resolveu passando item a item (ótimo para uso em queries SQL onde precisa-se do item da listbox). Para efeito de consulta, segue código:

For x = 0 To Me.Lista0.ListCount – 1
Me.Lista0.Selected(x) = True
ind = Me.Lista0.Column(0, Me.Lista0.ListIndex)
‘MsgBox ind
Me.Lista2.AddItem (ind)
Next

Simples, não? agora só adaptar para seu código!

Sobre Diego Duarte

Diego Duarte atua como coordenador de suporte, é apaixonado por TI e arranha um violãozinho nos finais de semana

Gostou do conteúdo? Deixe seu comentário