List.list --> Label.caption

Dette gør du på denne måde.

Laber din Label som collection. dvs. Label1(0) til Label1(9).

Og ...

  For nI = 1 To 2
    Label1(0) = List1.List(0)
  Next nI

Hov ... for ni = 0 to 9 .. sorry

Du skriver, hvis du ikke har indexeret dem:

Label1 = List1.List(0)
Label2 = List1.List(1)
Label3 = List1.List(2)
Label4 = List1.List(3)
Label5 = List1.List(4)
Label6 = List1.List(5)
Label7 = List1.List(6)
Label8 = List1.List(7)
Label9 = List1.List(8)
Label10 = List1.List(9)

...ellers gør du sådan med indexer:

For i = 1 To Label1.UBound
    Label1(i) = List1.List(i)
Next i

ups... start på 0 sådan:

For i = 0 To Label1.UBound
    Label1(i) = List1.List(i)
Next i

giv labelen navnet > Linje(0)

(index nummeret 0)

dim ANTAL as integer

for n = 0 to list1.listcount - 1
antal=antal + 1
load linje(antal)

linje(antal).caption = list1.list(n) 
next n

>Det er lige som de andres<

mvh.
ANSWER

devman fortalte lige det jeg havde brug for så tak for det!

Truti