UpdateControls Method Example

This example cancels changes made to bound controls and restores the data to the original values. Copy this code into the definition section of a form that has a data control named oradata1 (which has been successfully refreshed) and has the KeyPreview property set to True. Then press F5.

Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)

Const KEY_ESCAPE = &H1B

If KeyCode = KEY_ESCAPE Then

oradata1.recordset.UpdateControls

End If

End Sub