Visual Basic - ayuda con el boton esc

HOLA ESPERO Q ME PUEDAN AYUDAR
NECESITO CERRA MI FORMULARIO CON EL BOTON ESC, REALIZO LA SGTE ACCION PERO NO ME RESPONDE

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = 16 Then
If KeyCode = 27 Then
UNLOAD ME
End If
End If
End Sub

HAGO ESTO Y NADA , HABRA OTRA FORMA, POR SIACASO YA PUSE KEYPREVIEW=TRUE EN EL FORM LOAD

pon un command buttom y le añades este código

Private Sub Command1_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
Unload Me
End If

ahora achica el formulario para que no se vea y cuando pulses escape funcionará

saludos