Differenze tra le versioni di "Eliminare uno o più item di una ListBox selezionati con il mouse"
Da Gambas-it.org - Wikipedia.
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>> | ||
− | <FONT Color=green>.Mode</font | + | <FONT Color=green>.Mode</font> = <FONT Color=red>Select.Multiple</font> |
End With | End With | ||
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