Dim n As Notification
n.Initialize
n.Icon = "icon"
n.SetInfo ("Aplicación xx", "Se está ejecutando", "Activity a ejecutar")
n.Notify(1)
Dim n As Notification
n.Initialize
n.Icon = "icon"
n.SetInfo ("Aplicación xx", "Se está ejecutando", "Activity a ejecutar")
n.Notify(1)
Sub Button1_Click
StartService(Servicio)
End Sub
Sub Button2_Click
StopService (Servicio)
End Sub