Pessoal tem como eu passar um parametro que nao seja numero no idex de um listbox?

Acontece que eu presciso passar dois dados no index da list, tipo assim:

lsFinal.ItemData(lsFinal.NewIndex) = lsOrigem.ItemData(lsOrigem.ListIndex) & lsDestino.ItemData(lsDestino.ListIndex)

 

mas eu prescisava separar os dois pra depois eu saber quem eh quem. Por exemplo, suponha que eu recupere "112" - como eu saber se o Origem eh 1 ou 11 e se o Destino eh 2 ou 12, entenderam????

Ja pensei em fazer isso por Array mas nao dah certo. Eu pensei em colocar alguma coisa que separasse os dois codigos mas nao estou conseguindo, tipo assim:

 

lsFinal.ItemData(lsFinal.NewIndex) = lsOrigem.ItemData(lsOrigem.ListIndex) & "|" & lsDestino.ItemData(lsDestino.ListIndex)

 

mas ele nao aceita.

 

Desde ja grato

Olá Defende, boa tarde.

 

Realmente, não é possível fazer o que você quer. O index do Listbox é do tipo Integer e não aceita nada diferente disso. Existe uma forma, não muito bonita, de se fazer isto, mas, no seu caso, acredito que irá resolver.

 

Ao adicionar o item em seu List, proceda da seguinte maneira:

 

List.Add StringConteudo + Space(100) + "#" + lsOrigem.ItemData(lsOrigem.ListIndex) & "|" & lsDestino.ItemData(lsDestino.ListIndex)

 

Ou seja, tudo o que estiver à direita do símbolo "#", no item selecionado, estará a sua disposição para que você dê o tratamento que quiser.

Utilizando as funções: Mid(), Left(), Right(), Len(), etc. você obterá separadamente os números desejados, sem necessitar obrigatoriamente do index do listbox.

 

PS: o símbolo "#" é só uma sugestão. Você pode substituí-lo pelo simbolo que melhor lhe convier ou até ignorá-lo.

 

Espero ter colaborado, boa sorte.