Sub Activity_KeyPress (KeyCode As Int) As Boolean
Select KeyCode
Case KeyCodes.KEYCODE_BACK
CallSubDelayed(Me, "HandleBackKey")
Return True
Case KeyCodes.KEYCODE_POWER
CallSubDelayed(Me, "HandlePowerKey")
Return True
Case KeyCodes.KEYCODE_HOME
CallSubDelayed(Me, "HandleHomeKey")
Return True
Case KeyCodes.KEYCODE_MENU
CallSubDelayed(Me, "HandleMenuKey")
Return True
End Select
Return False
End Sub
Sub HandleMenuKey
'Tú código
End Sub