Tengo una lista en un componente List, cuyos elementos se recogen de una BD. Cómo puedo ordenarlos alfabeticamente? Tambien necesito que según se pulsan teclas funcione como los indices de las ayudas, va accediendo a la entrada que más se aproxime dentro de la lista. Cómo se realiza esta función en VB 6.0?
Gracias
Ayuda! VB:Ordenar lista y acceder segun la letra
Moderador: Moderadores
Re: Ayuda! VB:Ordenar lista y acceder segun la letra
abre la base de datos ordenada alfabéticamente y tienes el primer problema resuelto, o bien usa la propiedad SORT del LIST para ordenar alfabéticamente.
Con respecto al otro problema, puedes hacer:
letra_seleccionada="A"
for x=0 to list.listcount-1
if left(list.list(x),1)=letra_seleccionada then valor=xlist.listcount-1
next
en valor tienes la posición que ocupa el nombre que empieza por A, ahora lo que tienes que hacer es moverte por el LIST para que aparezca en primer lugar.
Si quieres algo, ponte en contacto JCIFITZ@santandersupernet.com
saludos
Con respecto al otro problema, puedes hacer:
letra_seleccionada="A"
for x=0 to list.listcount-1
if left(list.list(x),1)=letra_seleccionada then valor=xlist.listcount-1
next
en valor tienes la posición que ocupa el nombre que empieza por A, ahora lo que tienes que hacer es moverte por el LIST para que aparezca en primer lugar.
Si quieres algo, ponte en contacto JCIFITZ@santandersupernet.com
saludos
-
- Junior
- Mensajes: 13
- Registrado: Dom May 18, 2003 1:55 am
- Contactar:
Ordenar
Puedes abrir la base de datos ordenanda con lo cual no te hace falta ordenar el list. También puedes usar la opción SORT del list.
Para saltar a un dato de un list que coincida con una letra puedes hacer
letra="A"
for x=0 to list.listcount-1
if left(list.list(x),1)=letra then
lugar=x
x=list.listcount-1
endif
next
en lugar tienes el índice del primer dato que empieza por letra, lo que te falta es hacer que aparezca este dato en primer lugar
Para saltar a un dato de un list que coincida con una letra puedes hacer
letra="A"
for x=0 to list.listcount-1
if left(list.list(x),1)=letra then
lugar=x
x=list.listcount-1
endif
next
en lugar tienes el índice del primer dato que empieza por letra, lo que te falta es hacer que aparezca este dato en primer lugar
Saludos