Dim noti As Notification
noti.Initialize
noti.Light = False
noti.vibrate = False
noti.OnGoingEvent = True
noti.Sound = False
noti.Icon = "icon"
' noti.SetInfo("Alarm", "Alarm will start at " & DateTime.Time(alarm), menu)
noti.SetInfo2("Alarm", "Alarm will start at " & DateTime.Time(alarm),"notialarm", menu)
noti.Notify(1)