Pasar un campo calculado en access 2003 a un textBox en visual basic 6.0
Estoy reparando mi proyecto de titulación en visual basic 6, la cuestión es que necesito pasar un campo calculado en una consulta desde visual basic a un textBox y me da el siguiente error: 3464 "No coinciden los tipos de datos en la expresión de criterios" te muestro mi código:
& " FROM PLAN_CUENTA INNER JOIN COMP_CONTABLE ON PLAN_CUENTA.COD_CTA = COMP_CONTABLE.COD_CTA" _
& " GROUP BY PLAN_CUENTA.ID_CLAS, COMP_CONTABLE.COD_CTA;"
Set rstComp_contable = Cnn.OpenRecordset(strq)
If rstComp_contable.EOF Then
Me.txtSaldo.Text = CDbl(Me.txtDebe.Text) + CDbl(Me.txtHaber.Text)
Else
Me.txtSaldo.Text = rstComp_contable.Fields("SALDO")
t_cta = Trim(Left(Me.txtCodigo.Text, 1))
If (t_cta = "1") Or (t_cta = "3") Then
Me.txtSaldo.Text = CDbl(Me.txtSaldo.Text) + CDbl(Me.txtDebe.Text) - CDbl(Me.txtHaber.Text)
Else
If (t_cta = "2") Or (t_cta = "4") Then
Me.txtSaldo.Text = CDbl(Me.txtSaldo.Text) + CDbl(Me.txtHaber.Text) - CDbl(Me.txtDebe.Text)
End If
End If
End If
EL ERROR OCURRE EN LA LINEA "Me.txtSaldo.Text = rstComp_contable.Fields("SALDO")"
Utilizo dao como manejar de base de datos
Y la base de datos esta hecha en access 2003.
Respuesta de Luis_P
1