LISTBOX ORDEM CRESCENTE E DECRESCENTE

BRENNO 06/12/2006 13:42:47
#188328
como ordenar um Listbox por ordem crescente decrescente???
crescente é so colocar Sort = true mas e decrescente?? vlwsss
HARRY.POTTER 06/12/2006 13:49:33
#188331
Resposta escolhida
Coloque uma Listbox oculta, com Sort = true, e copie seu conteudo ao contrário para a lista que se deseja:

for i = ListCrescente.selcount - 1 to 0 step -1
ListDecrescente.additem ListCrescente.list(i)
next

BRENNO 06/12/2006 13:51:32
#188332
mais uma duvida sabe o scrool da list? como q eu faco para q ele desca automatico sempre q for adicionado alguma coisa sabe?? deixar a list sempre mostrando o ultimo item, o scrool desce automatico manja?
HARRY.POTTER 06/12/2006 13:54:13
#188333
Para isso basta fazer o seguinte:

list1.additem "Teste"
list1.selected(list1.selcount-1) = true


ou

list1.additem "Teste"
list1.setfocus
SendKeys "{END}"
USUARIO.EXCLUIDOS 06/12/2006 14:08:21
#188339
Na verdade pra selecionar o último adicionado, o correto seria:

List1.ListIndex = List1.NewIndex


Pois se ele estiver com Sort = True, não necessariamente o último da lista será o último adicionado, além disso a propriedade SelCount retorna o nr de itens selecionados e não o nr de itens total...flw
Tópico encerrado , respostas não são mais permitidas