Как задать параметры для всех элементов формы?

[Klim Bassenger]

Подкажите, пожалуйста!
На форме есть несколько текстбоксов, например,
Textbox1
Textbox2
Textbox3
...
И так далее...
Как объявить для определенных текстбоксов (например, с 5 по 8) какое-то действие...
Например задать его длину, ширину и т.д.???

[EducatedFool]

Private Sub UserForm_Click()
    For i = 5 To 8
        With Me.Controls("TextBox" & i)
            .Width = 100
            .Height = 20
            .BackColor = vbGreen
            .Font.Size = 12
        End With
    Next
End Sub

[Klim Bassenger]

То что нужно, спасибо!!!