Visual Basic - BOTON UP ALL

Life is soft - evento anual de software empresarial
 
Vista:

BOTON UP ALL

Publicado por Jannet (4 intervenciones) el 23/07/2014 15:47:01
Hola, tengo un listbox con "n" cantidad de datos, tengo 4 boton, para bajar subir y para bajar y subir todos los datos que aparecen en la primera pantalla que son unos 13 masomenos, el codigo que estoy usando es este:
BOTON BAJAR TODO:

1
2
3
4
5
If lstmaquinas.SelectedIndex < lstmaquinas.Items.Count - 1 Then
            lstmaquinas.SelectedIndex = lstmaquinas.SelectedIndex + 13
            If lstmaquinas.Items.Count > lstmaquinas.SelectedIndex Then
            End If
        End If

si me baja esos registro pero aparece la linea azul en el ultimo dato de la primera pantalla, osea no se pone en un principio como si fuera una nueva pagina, quiero saber que le tengo que poner porque soy principiante y no conozco muy bien los comandos ni eso , tambien quiero saber como validarle que si llega al final de los "n" numeros ya no haga nada por que me sale error :

InvalidArgument=El valor de '39' no es válido para 'SelectedIndex'.

Este es el codigo que tengo del boton
SUBIR TODO:

1
2
3
4
5
If lstmaquinas.SelectedIndex > lstmaquinas.Items.Count + 1 Then
            lstmaquinas.SelectedIndex = lstmaquinas.SelectedIndex - 13
            If lstmaquinas.Items.Count < lstmaquinas.SelectedIndex Then
            End If
        End If

ese no me funciona , serian muy amable si tienen el conocimiento en esto y podrian ayudarme :)
GRACIAS
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder