Eliminar Texto Seleccionado De Un ListBox

[‭lipman]

Que conste que ya he buscado (por eliminar listbox) y de los tres posts que salieron, xDie, estubo a punto de solucionarme la duda, pero al final, no lo resolvieron.

Bueno, solamente es eso, me gustaria poder eliminar desde un commandbutton el elemento seleccionado de un listbox.

Gracias

[Jareth]

Código [Seleccionar] Expandir

List1.RemoveItem List1.ListIndex
Saludos.

[‭lipman]

Al final he podido solucionarlo de esta manera:

Código [Seleccionar] Expandir

Private Sub cmd3_Click()
Dim i As Integer
For i = 0 To Lista.ListCount - 1
    If Lista.Selected(i) = True Then
        Lista.RemoveItem (i)
        Exit For
    End If
Next i
End Sub


Bueno gracias

[NYlOn]

 

y por que no lo haces con el codigo que te dejo Jareth??
no tienes que usar bucles, y en el caso de que sea un listbox con muchos items, tardaria muchisimo mas el metodo que estas usando...

[‭lipman]

Bueno, el que he posteado me lo dieron antes, y de ese modo venia aqui a ponerlo, pero cuando vi que me habia contestado dije... voy a probar el que me ha dicho jareth, y pensé que como en su codigo no aparece la palabra selected, pensaria que no haria lo que yo pensaba.

De todas maneras gracias, y es que ya he puesto ese codigo en el programa que he posteado arriba.