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

[manzarinaa]

LA MADRE QUE ME PARIOOOO!!!!! QUE TONTERIA Y QUE DE HORAS
el nombre estaba mal escrito, el del formulario, pero mira a ver si ya que estas me puedes hacer el fabor... si no ya me lo voy mirando y pongo un post nuevo (es que voy contrareloj)
Ahora no me concatena

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 & "', '"
End If
Next crtlControl
sentencia = Right(sentencia, 2)
sentencia = sentencia & "')"
MsgBox sentencia