Il KeyPreview puoi definirlo come Parametro di DEFAULT ed evitarti di andarlo a modificare su ACTIVATE... o ti da problemi...?
IN tutti i casi dopo la query di Accodamento per aggiornare la SubForm devi eseguire un REQUERY della SubForm
Me!NomeSubForm.Form.Requery