1 adet label ekle eklediğin labeli kopyalayarak index attır

10 adet label1 olacak indexleri label1(0-9 arasında sayi alır)

dim i as integer
for i = 0 to 9 step 1
label1(i).caption = Int(rnd*9)
next i

herseferinde farklı vermez tahminen if döngüsüyle kontrol ettirebilirsin