jueves, 31 de octubre de 2013

¿Cómo detectar si un campo cambió?

Supongamos que queremos ejecutar una acción en Microsoft Access sólo si un campo cambió su valor. Para manejar esta situación, podemos comparar el valor actual con el anterior así:

 If ComboNorma.Value <> ComboNorma.OldValue Then
    i = MsgBox("Algo cambió, ¿desea continuar?", vbYesNo + vbExclamation, "Info")
                If i = vbYes Then
                    ComboSubRubro.Value = ComboNorma.Column(2)
                End If
   End If