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=red>Select.Multiple</font | + | <FONT Color=green>.Mode</font>> = <FONT Color=red>Select.Multiple</font> |
End With | End With | ||
Versione delle 10:46, 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
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
