обнуление TextBox в форме

[demid77]

есть форма с несколькими TextBox'ами (~ 50). при некоторых действиях пользователя необходимо обнулять эти TextBox'ы. Отличить эти TextBox'ы от других могу по имени. Вопрос: как это сделать обнуление, чтобы код был покороче?

[Pite]

Если в VB то нужно при проектировании формы создать TexBox, установит у него нужные параметры, затем скопировать и вставить. VB спросит сделать данный textBox массивом или нет, сделать и далее накопировать их сколько надо. Они будут с одинако именоваться например txtMyField и будут с индексом txtMyField(0), 1, 2 и т.д. Соответсвенно
For i=0 to txtMyField.count-1
txtMyField(i).Text=""
next i

Если VBA то имя поля пускай начинается с одинаковой последовательности букв Например txtA, txtB, txtC и т.д.

for i=0 to me.controls.count-1
if mid(me.controls(i).name,1,3)="txt" then
me.controls(i).value=""
end if
next i