whats the problem?

[imastupidguy]

Private Sub form_keypress()
If Keycode = vbKeyA Then
Command20_Click
End If
End Sub

error:

procedure decloration does not match description of event or procedure having the same name

Private Sub form1_keypress()
If Keycode = vbKeyA Then
Command20_Click
End If
End Sub

however has no error but does nothing.