Public Class Form1
Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean
If keyData = Keys.LMenu Or Keys.F4 Then Return True
Return MyBase.ProcessCmdKey(msg, keyData)
End Function
End Class