Sub Activity_Create(FirstTime As Boolean)
panel0.Initialize("") : panel0.Visible = True
Activity.AddView(panel0, 0, 0, 100%x, 100%y)
panel0.LoadLayout("leer")
End Sub
Sub Activity_Resume
Dim in As Intent
in = Activity.GetStartingIntent
Dim split() As String = Regex.Split("<>",in.GetExtra("Notification_Tag"))
If split(0) ="Notification_Tag" And split.Length > 0 Then Msgbox(split(1), "Notif...")
StartActivity(Main)
Activity.Finish
End Sub