Sub Activity_KeyPress (KeyCode As Int) As Boolean
If KeyCode = KeyCodes.KEYCODE_BACK Then
Select Msgbox2Async("Are you sure you want to exit?","WARNING","Yes","No","",Null,False)
Case DialogResponse.POSITIVE
Activity.Finish
Case Else
Return True
End Select
End If
End Sub