Modificar datos con ado

 Hola expertos, antes que nada gracias por su disposición, mi consulta es la siguiente:
Tengo 5 botones para manipulación de registros (nuevo,grabar,eliminar,cancelar,salir y actualizar)
Todos en una matriz y resulta que cuando quiero modificar datos es decir Actualizar me realiza una grabación de un registro nuevo, mi código para el botón de grabar y actualizar es:
Private Sub cmdmant_Click(Index As Integer)
Dim n As Boolean
Case 1
'grabar
If n = true Then
Call llenar datos
Juegos. Update
MsgBox "Juego actualizado", vbInformation, "Juego cargado"
Call habilitar(True)
n = false
Else
Juegos. MoveFirst
Juegos. AddNew
Call llenar datos
Juegos. Update
MsgBox "Juego guardado", vbInformation, "Juego cargado"
Call habilitar( True)
End If
Case 5
'Actualizar
habilitar (False)
n = true
End Select
End Sub
Mi variable lógica cambia de valor perfectamente ya que lo comprobé con un MSGBOX en la línea pero el if de Guardar me agrega un nuevo registro en lugar de actualizar.
Gracias espero me puedan ayudar!!!!!

0

Añade tu respuesta

Haz clic para o