pasar un formulario y sus controles a un procedimiento(casi lo de antes)

[manzarinaa]

la declaro en un boton y si, entre comillas que se me habia escapado, es un string
el código es este
Private Sub cmdContinuar_Click()
Dim validado As Boolean
formulario As Form
validado = ValidarFormulario(frmPaginas)
formulario = frmClientes
Call AltaEnBBDD(frmClientes, "clientes")
Call AltaEnBBDD(frmPaginas, "paginas")
esto ya es en un módulo
Public Sub AltaEnBBDD(ByRef formulario As Form, tabla As String)
Dim sentencia As String
Dim crtlControl As Control
sentencia = "Insert into " & tabla & " values('"
For Each crtlControl In formulario.Controls
If TypeOf crtlControl Is TextBox Then
sentencia = sentencia & crtlControl.Text & "', '"
.
.
.
SOS!! no hay manera
La instruccion no es válida fuera de un bloque type