Public Class frmNewSplash Private Sub frmNewSplash_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Label1.Text = "Version " & Globals.Version Me.Label3.Text = Globals.Versionsdatum End Sub End Class