Sub Activity_KeyPress (KeyCode As Int) As Boolean
If KeyCode = KeyCodes.KEYCODE_BACK Then
answ = Msgbox2("Sei sicuro di voler uscire dal programma?","ATTENZIONE !!","SI","","NO",Null)
If answ = DialogResponse.POSITIVE Then
Return False
End If
End If
Return True
End Sub