Visual Basic - Error agregar un registro Access 07

Hola chicos, este es mi problema.
VB6 + Access 2007 + ADO

La aplicacion esta hecha en windows 7 (funciona perfecto) pero en XP da el error.

Jamas me pasó, al intentar agregar un registro en la base me sale error de "Uso no valido de null".
La base de datos SI CONTIENE registros almacenados.

Private Sub btnGuardar_Click()

'aqui coloco en un txt el codigo del cliente consecutivo al anterior
If Base.RecordCount > 0 Then
Base.MoveLast
txt_codigo.Text = Format(Base.Fields(0).Value + 1, "0000000")
Else
txt_codigo = "0000001"
End If

'me voy al ultimo registro para agregar uno nuevo (simpre lo hice asi)
Base.MoveLast
'desde aqui en adelante no pasa, hasta aqui llega, sale error de null
With Base
.AddNew
.Fields("Codigo") = txt_codigo.Text
.Fields("Nombre") = txt_nombre.Text
.Fields("Apellido") = txt_apellido.Text
.Fields("DNI") = txt_dni.Text
.Fields("Localidad") = txt_localidad.Text
.Fields("Domicilio") = txt_domicilio.Text
.Fields("Telefono") = txt_telefono.Text
.Fields("Saldo") = Replace(txt_saldo.Text, ",", ".", 1)
.Update
End With

End sub

puede que tengas mal configurado el access, eso de indexado o clave principal, me paso una vuelta que tenia todos mis clientes desordenados en la base de datos, entonces al queres agregar uno nuevo me decia que el valor era duplicado.

Hola, zugger, no he dado solucion a mi problema todavia. te agradezco tu cooperacion