Ciao
Ho un problema sulle listbox che penso sarà banale per un esperto.
Ho 2 listbox : quando clicco su un elemento della 1, lo visualizzo sulla 2. Vorrei, però, farlo sparire dalla 1, ma il RemoveItem mi dà errore.
Ecco il codice :
Come devo formulare correttamente il codice ?codice:Private Sub Command1_Click() Dim I As Integer List2.Clear For I = 0 To List1.ListCount - 1 If List1.Selected(I) = True Then List2.AddItem List1.List(I) List1.RemoveItem I End If Next I End Sub
E come se poi voglio far riapparire una o tutte le voci della List 2 nella 1 (con un doppio clic o con un altro cmdButton) ?
Grazie