The solution to this for Total Access Memo is to use the KeyPress or KeyDown event to perform the action you are trapping for.
To use this for the "Tab" or "Shift + Tab" Key, simply add the following Code to your form:
' This code moves focus out of the Total Access Memo Control ' to the next or previous control you want to set focus to Option Compare Database Option Explicit Private mfShiftDown As Boolean Private Sub mmoTest_KeyDown(KeyCode As Integer, Private mfShiftDown As Boolean Private Sub mmoTest_KeyDown(KeyCode As Integer, ByVal Shift As Integer) ' This code is from Microsoft Help for the KeyDown event ' Use bit masks to determine which key was pressed. mfShiftDown = ((Shift And acShiftMask) > 0) End Sub Private Sub mmoTest_KeyPress(keyascii As Integer) If KeyAscii = vbKeyTab Then If mfShiftDown Then Me!PreviousControl.SetFocus Else Me!NextControl.SetFocus End If KeyAscii = 0 End If End Sub
Where "mmoTest" is the name of your control and "NextControl" is the next control you want to set focus to and "PreviousControl" is the name of the previous control you want to set focus to when using Shift and Tab keys together.