du kan göra denna, om du är rinnande queriesna från en bilda.
using det nyckel- besegra händelsen av bilda
uppsättning datalistans den KeyPreview egenskapen som ska trues
Privata underForm_KeyDown (KeyCode som heltal, förskjutning som heltal)
Om KeyCode = vbKeyEscape därefter
KeyCode = 0
Avsluta om
Avsluta suben