Ciao, devi mettere il tutto nell'evento KeyDown
codice:Private Sub List_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyDelete Then List.RemoveItem (List.ListIndex) End If End Sub![]()
Ciao, devi mettere il tutto nell'evento KeyDown
codice:Private Sub List_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyDelete Then List.RemoveItem (List.ListIndex) End If End Sub![]()
Jupy