Hijej! :)
Här är en ganska bra lösning.
For p = 0 To (List2.ListCount - 1)
List3.ListIndex = p
If List2.Selected(p) = True Then
List1.AddItem (List3.Text)
End If
Next p
Gjorde tre stycken "List" varav två stycken (List2 & 3) fick innehålla samma information.
List1 = för att läsa in resultatet.
List2 = för användaren att markera i.
List3 = för att veta vad som står på den markerade platsen.
List3 är förslagsvis visible = false
Anledningen till att jag blandade in en tredje List är för att man måste ha platsen (Listindex) markerad för att kunna läsa den.
