Sub Service_Create
Service.AutomaticForegroundMode = Service.AUTOMATIC_FOREGROUND_NEVER
Dim icon As Bitmap = LoadBitmapResize(File.DirAssets, "smiley.png", 24dip, 24dip, False)
Dim n As NB6
n.Initialize("default", Application.LabelName, "DEFAULT").AutoCancel(True).SmallIcon(icon).Color(Colors.Red).Colorized(True)
Service.StartForeground(10, n.Build("Colorized", "This is a foreground service notification", "tag1", Me))
End Sub