Можно- ли сделать цикл для имен объектов?

[Ivan1]

Если названия объктов одиноковые
А разное только окончание
Можно сделать цикл и окончание
Присваивать имени.
Например
Label1.caption
Label2.caption
Label3.caption
Label4.caption
For i=1 to 4
Label(Я идиот! Убейте меня, кто-нибудь!).caption
next
Спасибо тому кто подскажет

[alibek]

Код: Выделить всё

For I = 1 To 4
  Controls("Label" & Trim$(Str$(I))).Caption = "Label " & I
Next I