çok sayıdaki textbox için döngü kurmak

[udentr2002]

Merhaba arkadaşlar,

aşağıdaki kodlar yardımı ile textboxun enter olayında ve exit olayında boyutunu değiştiriyorum
yani texboxun içine girdiğimde textbox büyüyor texboxdan çıktıktan sonra textbox eski haline geliyor fakat bende form üzerinde çok fazlası ile textbox var

Private Sub TextBox1_Enter()
TextBox1.Height = 123
TextBox1.ZOrder 0
End Sub

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Height = 18
End Sub

Fakat form üzerinde çok fazla textbox var her bir textboxa ayrı ayrı bu kodları uygulamak yerine bir döngü kullanarak yapabilirmiyiz acaba mümkün müdür?

 

[Murat OSMA]

Örnek dosya.

 

[udentr2002]

Hocam ilginiz için teşekkürler.
Şimdi uygulamaya çalıştım fakat kullanımı zor olacak.
enterla büyüyen ve exit yordamı ile eski haline dönen kodlar yerine,

Maus o textboxun üzerine geldiğinde büyüyen ve mausu o textboxun üzerinden çektiğimizde eski haline dönebilecek şekilde bir şey olabilir mi böylesi daha kullanışlı olacak benim için.

hakkınızı helal edin.