Cita:
Iniciado por manzarinaa
Hola avellaneda
es por este if
If crtlControl.Tag = "Telefono" Or crtlControl.Tag = "idcli" Or crtlControl.Tag = "idpag" Then
que es en el que controlo que si me esta entrando un campo numerico o no
¿Y para qué quieres controlar si el campo es numérico, para poner o no las comillas simples entre el campo?
No es necesario, la instrucción INSERT INTO admite los valores numéricos tanto entre comillas como sin ellas.
Código:
For Each crtlControl In formulario.Controls
If TypeOf crtlControl Is TextBox Then
valores = valores & "'" & crtlControl.Text & "', "
campos = campos & crtlControl.Tag & ", "
End If
Next crtlControl
Sin necesidad de comparar campos.