Differenze tra le versioni di "Eliminare uno o più item di una ListBox selezionati con il mouse"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Per eliminare uno o più item di una ''ListBox'', selezionati con il mouse, bisognerà innanzitutto assegnare alla Proprietà ".Mode" della ''ListBox'' la Costante ".Multiple"...") |
|||
| Riga 16: | Riga 16: | ||
Public Sub ListBox1_Leave() | Public Sub ListBox1_Leave() | ||
| − | For b | + | For b As Byte = 0 To ListBox.List.Max |
If ListBox1[b].Selected Then | If ListBox1[b].Selected Then | ||
ListBox1.Remove(b) | ListBox1.Remove(b) | ||
Versione delle 10:43, 17 nov 2023
Per eliminare uno o più item di una ListBox, selezionati con il mouse, bisognerà innanzitutto assegnare alla Proprietà ".Mode" della ListBox la Costante ".Multiple" della Classe statica Select.
Mostriamo quindi un possibile codice:
Public Sub Form_Open()
With ListBox1
' Assegnazione eslicita di vaori stringa per 5 elementi della "ListBox":>
.List = ["aaaa", "bbbb", "cccc", "dddd", "eeee"]
' Consente di selezionare con il mouse più di un elemento della "ListBox":>
.Mode = Select.Multiple 'Para poder seleccionar más de un elemento en la lista
End With
End
Public Sub ListBox1_Leave()
For b As Byte = 0 To ListBox.List.Max
If ListBox1[b].Selected Then
ListBox1.Remove(b)
b -= 1
Endif
Next
End
