Add NewFileIndex
This commit is contained in:
@@ -26,13 +26,9 @@ Public Class frmMain
|
||||
If My.Application.Service.Online Then
|
||||
LabelServiceOnline.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
LabelServiceOffline.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
'LabelServiceOnline.Caption = "Service Online"
|
||||
'LabelServiceOnline.ItemAppearance.Normal.ForeColor = Color.Green
|
||||
Else
|
||||
LabelServiceOnline.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
LabelServiceOffline.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
'LabelServiceOnline.Caption = "Service Offline"
|
||||
'LabelServiceOnline.ItemAppearance.Normal.ForeColor = Color.Red
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Reference in New Issue
Block a user