Ver Mensaje Individual
  #4 (permalink)  
Antiguo 02/06/2008, 01:05
etxebe
 
Fecha de Ingreso: enero-2008
Mensajes: 61
Antigüedad: 16 años, 4 meses
Puntos: 0
Respuesta: Detectar modificaciones

Lo puedes hacer con el evento Change de los TextBox:

Private Sub Text1_Change()
Preguntar_guardar = True
End Sub

Asi ya sabes que se ha modificado algo, y por lo tanto puedes hacer:

Private Sub Form_Unload
If Preguntar_guardar = True Then
MsgBox "Desea guardar los cambios realizados?"
End If
End sub

Si la respuesta es que sí, ejecutas el codigo para guardar los datos.

Agur.