ABCdatos

Mil gracias por su ayuda, aquí pongo el error a ver si me pueden ayudar
a saber que es lo que pasa:


Private Sub cmdguardar_Click(Index As Integer)

Dim clsFunciones As New clsFunciones
Dim strResultado As String


If bUpdate = False Then
strResultado = clsFunciones.InsertarRegistro(Trim(TxtConsecutivo.Text), Trim(txtEspecialidad1.Text),_
Trim(Txtcodprofes.Text), Trim(Txttipconsul.Text), Trim(Txtatendido.Text), _
Trim(txtServicio.Text), Trim(txtHorarioUtilizado.Text), Trim(txtHorarioPrg), _ Trim(txtHorasUtil.Text), Trim(txtHorasPrg.Text), Trim(txtTotalGeneral.Text), Trim(TxtSubtotalPV.Text), _
Trim(TxtEnVida.Text), Trim(txtEnAnio.Text), Trim(txtEnEspecialidad.Text), Trim(TxtAusente.Text), _
Trim(Txtalta.Text), Trim(TxtSubsecuentes.Text), Trim(txtsustituidos.Text), Trim(TxtContraRef.Text), _
Trim(TxtReferEspec.Text), Trim(TxtRefOtroCentro.Text), Trim(txtFecha.Text))

Else
True

End if
End if

End Sub



---------------------------
Microsoft Visual Basic
---------------------------
Compile error:

Argument not optional
---------------------------
Aceptar Ayuda
---------------------------