PrivateSublstUsers_VisualItemFormatting(sender AsObject, e AsListViewVisualItemEventArgs) HandleslstUsers.VisualItemFormatting
If(e.VisualItem.Text.Contains("3OFFLINE")) Then
e.VisualItem.DrawFill = True
e.VisualItem.GradientStyle = GradientStyles.Solid
e.VisualItem.BackColor = Color.Red
Else
e.VisualItem.ResetValue(LightVisualElement.DrawFillProperty, ValueResetFlags.Local)
e.VisualItem.ResetValue(LightVisualElement.GradientStyleProperty, ValueResetFlags.Local)
e.VisualItem.ResetValue(LightVisualElement.BackColorProperty, ValueResetFlags.Local)
EndIf
EndSub