diff --git a/ToolCollection/frmStart.vb b/ToolCollection/frmStart.vb index 8c0533c..a50e1ca 100644 --- a/ToolCollection/frmStart.vb +++ b/ToolCollection/frmStart.vb @@ -130,7 +130,11 @@ Public Class frmStart End Sub Private Sub CaptionForm() - Me.Text = Application.CompanyName & " - " & Application.ProductName & " - " & My.Settings.vInstanceName + If String.IsNullOrWhiteSpace(My.Settings.vInstanceName) Then + Me.Text = Application.CompanyName & " - " & Application.ProductName + Else + Me.Text = Application.CompanyName & " - " & Application.ProductName & " - " & My.Settings.vInstanceName + End If End Sub Private Sub FMStart_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load