Código:
private sub pasa_formularioA
'voy al modulo y le paso el nombre del formulario
escoge_form.escoge_form(me)
end sub
para el caso del modulo algo asi
Código:
module escoge_form
public sub escoge_form(byref formulario form)
' aqui lo que quieres hacer con el formulario
with formulario
.txt_observaciones = "Perfecto"
end with
end sub
end module
si lo que quieres es escribir codigo comun en los dos formulario esta seria una forma pasando el formulario como parametro por referencia no necesitas el select case, pero si las operaciones son especificas para cada formulario pues solo pones un if, a mi ver el error es que pasas como parametro el numero de formulario en la variable caso que es string pero lo que evaluas en el select case es una estancia nueva de un formulario, el cual nada tiene que ver con formluarioA o B, por lo que lo logico es que este formulario no contenga nada de controles ecepto asi mismo.
pero si necesitas crear dinamicamente el formulario uno o el dos
entonces necesitarias convertir la variable formulario del tipo form al tipo formularioA o B, pues son estos los que tienen los controles que utilizas en tu codigo.