Una buena forma es como indican Epa y AnioN, pero el detalle si te percatas, es que debes crear matrices de controles; pero con el For ... Each es mucho más funcional, ahí te dejo un pedazo de código:
SENTENCIA FOR EACH ... NEXT
Esta construcción es similar al bucle For, con la diferencia de que la variable que controla la repetición del bucle no toma valores entre un mínimo y un máximo, sino a partir de los elementos de un array (o de una colección de objetos). La forma general es la siguiente:
For Each variable In grupo
[ sentencias]
Next variable
Con arrays variable tiene que ser de tipo Variant. Con colecciones variable puede ser Variant una variable de tipo Object. Esta construcción es muy útil cuando no se sabe el número de elementos que tiene el array o la colección de objetos.
El código es este:
Private Sub cmdBorrar_Click()
Dim Control As Object
For Each Control In Controls 'Con este bucle recorres todos los controles del form
If TypeOf Control Is TextBox Then 'Comprueba que tipo de control es
Control.Text = ""
End If
Next Control
End Sub
Espero que te sirva.
____________________________________________________________________
Nadie sabe todo, ni nadie sabe nada.
Todos tenemos algo que enseñar, y también tenemos algo que aprender.
