vise hvad der er selected i listbox

For i = List1.ListCount - 1 To 0 Step -1
If List1.Selected(i) = True Then
List2.AddItem List1.List(i)
End If
Next i

Altså den laver en for der køre alle elementer i listen igennem, hvis den er selected tilføjer den elementet til liste nummer 2. Håber du kan bruge det til noget.

Mvh.
Søren

Det var ikke helt det jeg mente.

Jeg har en listbox og en label.

Når jeg markerer en post i listboxen, skal den tilføje værdien til labelen, og hvis jeg så markerer en mere i listboxen skal den både tage den første markering og den anden markering med.

Samtidig skal den fjerne det fra labelen hvis jeg fjerner markeringen af en eller flere i listboxen.

Håber du forstår det

Det var ikke helt det jeg mente.

Jeg har en listbox og en label.

Når jeg markerer en post i listboxen, skal den tilføje værdien til labelen, og hvis jeg så markerer en mere i listboxen skal den både tage den første markering og den anden markering med.

Samtidig skal den fjerne det fra labelen hvis jeg fjerner markeringen af en eller flere i listboxen.

Håber du forstår det

Dette virker, du kan så selv sætte i hvad den skal skrive mere end bare hvad der er markeret

Private Sub List1_Click()
Dim a As String
For i = List1.ListCount - 1 To 0 Step -1
If List1.Selected(i) = True Then
a = a + List1.List(i) & " "
End If
Next i
Label1.Caption = a
End Sub

Ja det virker, men nu har jeg fundet ud af at jeg heller vil bruge et listview.

Hvordan gør jeg så?

Mvh.
Søren Pedersen

Er der ingen der kan hjælpe mig når det er et ListView???

Mvh.
Søren Pedersen