Demetrio Cassarino
15 lines
544 B
VB.net
15 lines
544 B
VB.net
Public Class SplashScreenV
|
|
|
|
#Region "FIELDS & PROPERTIES"
|
|
|
|
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 Region ' Fields & Properties
|
|
|
|
End Class
|