When NotInList how do I leave combobox?

[Eightball3]

This is probably an easy question to answer but I'm having a bit of a problem with it. I have a combobox that has the LimitToList property set to true. When a user types something in the combobox that is not on the list, they can't leave the field until they select something off the list. There is a cancel button on the form that I would like them to be able to use when they realize that what they've typed is not in the list. As it is now the only option to get them out of the combobox is to hit the ESC key then push the cancel button. Thanks for any help.

 

[PWise]

Private Sub Comboname_NotInList(NewData As String, Response As Integer)
MsgBox "this item is not in list"
Response = acDataErrContinue
SendKeys "{esc}"
End Sub