You can do that with simply different way:

1. Remove ÎN KEY LABEL command
2. ERASE procedure p_esc
3. Set the KeyPreview propertie of the FormB to .t.
4. In KeyPress EVENT of the formB put the following code:

LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode == 27 .AND. nShiftAltCtrl == 0 && Esc w/o Shift, Ctrl or Alt
   NODEFAULT
   thisform.Release()
   RETURN
ENDIF