only show major + minor parts of current version

This commit is contained in:
Jonathan Jenne 2021-03-24 14:29:16 +01:00
parent 6a9e573900
commit 4e01de4f66

View File

@ -150,7 +150,11 @@ Public Class frmMain
' Create helper to save/load expanded GroupColumns at runtime
RefreshHelper = New RefreshHelper(GridView_Docs, "GUID")
bsiVersion.Caption = String.Format("Version {0}", My.Application.Info.Version.ToString)
' Nur noch die ersten Zwei Teile der Version anzeigen
Dim oVersion = My.Application.Info.Version
bsiVersion.Caption = String.Format("Version {0}.{1}", oVersion.Major, oVersion.Minor)
If ERROR_STATE = "NO DB-CONNECTION" Or ERROR_STATE = "FAILED DBCONNECTION" Then
MsgBox("Please add a database-Connection in AppConfig!", MsgBoxStyle.Critical, "Fehlende Konfiguration:")
frmKonfig.ShowDialog()