modulo para trabajar con formulario activo

[Slackin]

Gracias camaradas computines por abrir el foro para todos nosotros los
ignorantes.


Tengo 3 formularios con 10 textbox.text en cada formulario
de la siguiente manera:

textbox1.texttextbox2.text..............textbox10. text

Quisiera redactar un procedimiento general dentro de un modulo para
habilitar todos los textbox a la vez, sin importar cual sea el
formulario que estè activo cada vez.Lo que pasa es que estoy haciendo
un programa en el cual los formularios se activan randomicamentey el
usuario los tiene que ir llenando como si fuera un juego.
Necesito poder llamar al procedimiento apagartextbox() en caso
necesario, yse desactiven o activen todas las cajitas. Como si los
formularios fueran una variable.
Porque hasta ahora tengo que redactar codigo en cada formulario de la
siguiente manera:


public sub apagartodos()form1.textbox1.enabled=falseform1.tex tbox2.enabled=false..................form1.textbox 10.enabled=falseend
sub
luego al interior del otro formulario tengo que estar escribiendo el
mismo codigo
public sub apagartodos()form2.textbox1.enabled=falseform2.tex tbox2.enabled=false..................form2.textbox 10.enabled=falseend
sub.


Ustedes diran que se soluciona con copiar y pegar pero tendria que
ademas hacer pequeñitas modificaciones todo el rato.¿y si yo quisiera
usar 93 formularios por ejemplo o 117 formularios?Debe haber alguna
forma de tratar un formulario como si fuera una variable. Mientras he
estado programando he visto desplegarse una propiedad llamada
ActiveForm y en eso me he inspirado para preguntar.Gracias a todos
nuevamente y que Dios les bendiga .

[chcma]

Te pongo algo para que te orientes, este codigo (igual esta mal alguna letra de la sintaxis) lo que hace es poner todos las cajas de texto de un formulario (frmFormulario) a Disabled.

Código:

foreach(Control objControl in frmFormulario.Controls)
{
       if(objControl.GetType().ToString == "TextBox")
       {
             TextBox txtCajaTexto = (TextBox)objControl;
             txtCajaTexto.Enabled = false;
       }
}

saludos.