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"...") |
|||
(3 versioni intermedie di uno stesso utente non sono mostrate) | |||
Riga 8: | Riga 8: | ||
.List = ["aaaa", "bbbb", "cccc", "dddd", "eeee"] | .List = ["aaaa", "bbbb", "cccc", "dddd", "eeee"] | ||
<FONT Color=gray>' ''Consente di selezionare con il mouse più di un elemento della "ListBox"'':</font>> | <FONT Color=gray>' ''Consente di selezionare con il mouse più di un elemento della "ListBox"'':</font>> | ||
− | .Mode = Select.Multiple | + | <FONT Color=green>.Mode</font> = <FONT Color=red>Select.Multiple</font> |
End With | End With | ||
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 attuale delle 16:54, 7 dic 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 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