Sub Activity_KeyPress (KeyCode As Int)
Msgbox(KeyCode,"")
If KeyCode = 4 Then
Select Msgbox2("Do you want to save your changes?", "Exit Markbook", "Yes","Cancel", "No",Null)
Case DialogResponse.POSITIVE
SaveTableToCSV("mnt/sdcard/My Files/Markbook/","english.csv")
Activity.Finish
Case DialogResponse.NEGATIVE
Activity.Finish
Case DialogResponse.CANCEL
Return True
End Select
End If
End Sub