here u go

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = vbKeyF2 Then
If Shift = 4 Then
KeyCode = 0 'ie do nothing
End If
Else
Exit Sub
End If

End Sub


the only other way of doing it would be to use subclassing (see www.vbaccelerator.com)
and intercept the windows message at a lower level but thats quite hard.