Mensaje VBYesNO al reponder

[gasuton]

Iniciado por fantasma21

if mensaje = vbYes then

.....

Saludos

Ok despues de probar logre que me funcione pero no como se soupone, ya que caundo le pongo la opcion "No", igualmente me guardaba los regitro, por lo que me ocurrio poner lo siguiente:

Código:

Private Sub guardar_Click()

mensaje = MsgBox("Esta seguro que quiere guardar los datos?", vbYesNo, "ABM Grupos")

If mensaje = vbYes Then
grupo.Recordset.Update
mensaje = MsgBox("Los datos han sido actualizados!", vbInformation, "ABM Grupos")
Else: grupo.Recordset.Delete
      grupo.Recordset.MoveNext
      If grupo.Recordset.EOF Then
      grupo.Recordset.MoveLast
      End If
End If

End Sub

El problema es que si bien con el Else no me guarda los registros, si me consume un ID dentro de mi DB.

Habra algo que pueda hacer para que esto no pase?

Saludos y Gracias