icarus/Icarus/SplashScreen/SplashScreen.xaml.vb

Public Class SplashScreen

   Private Sub SplashScreen_Initialized(sender As Object, e As EventArgs) Handles Me.Initialized
      VersionTxBl.Text = "Version " & My.Application.Info.Version.Major.ToString() &
                         "." & My.Application.Info.Version.Minor.ToString() &
                         (ChrW(97 - 1 + My.Application.Info.Version.Build)).ToString() &
                         My.Application.Info.Version.Revision.ToString()
   End Sub

End Class