Sub Activity_KeyPress( KeyCode As Int ) As Boolean ' Return True to consume the event
' ATTENZIONE questo serve per fare smettere i servizio, se no continua a girare sempre
If KeyCode = 4 Then ' back key
StopService(Tracker)' indicare il nome del servizio
CancelScheduledService(Tracker) ' indicare il nome del servizio
Activity.Finish
End If
Return True
End Sub ' Activity_KeyPress()