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
