Sub fm_MessageArrived (Message As RemoteMessage)
Log("Message arrived")
Log($"Message data: ${Message.GetData}"$)
Dim n As Notification
n.Initialize2(n.IMPORTANCE_HIGH)
n.Icon = "alert"
n.AutoCancel=True
n.SetInfo2("Titolo: "&Message.GetData.Get("title"), Message.GetData.Get("body"), "test!", Main)
n.Notify(1)
End Sub