Visual Basic.NET - Cambiar el orden de un item

   
Vista:

Cambiar el orden de un item

Publicado por Juan Carlos (1 intervención) el 19/05/2008 17:07:07
Hola tengo un problema no encuentro como poder cambiar el orden de un item en un listbox con un boton para subir el item y otro para bajar el item.
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

RE:Cambiar el orden de un item

Publicado por P. J. (706 intervenciones) el 20/05/2008 17:29:15
Private Sub btnSubir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubir.Click
Dim intIndice As Integer = Me.lstElementos.SelectedIndex
If intIndice > 0 Then
Me.lstElementos.Items.Insert(intIndice - 1, Me.lstElementos.SelectedItem)
Me.lstElementos.Items.RemoveAt(intIndice + 1)
Me.lstElementos.SelectedIndex = intIndice - 1
End If
End Sub

Private Sub btnBajar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBajar.Click
Dim intIndice As Integer = Me.lstElementos.SelectedIndex
If intIndice < Me.lstElementos.Items.Count - 1 Then
Me.lstElementos.Items.Insert(intIndice + 2, Me.lstElementos.SelectedItem)
Me.lstElementos.Items.RemoveAt(intIndice)
Me.lstElementos.SelectedIndex = intIndice + 1
End If
End Sub

Espero te sea util.
Salu2!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar