Public Class SplashForm Private Sub SplashForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load If My.Settings.SoftwareType = "PADM" Then Me.C1PictureBox1.Visible = False Me.C1PictureBox2.Visible = True Else Me.C1PictureBox1.Visible = True Me.C1PictureBox2.Visible = False End If Me.Label1.Text = "Version: " Label4.Text = Globals.Version Me.Label2.Text = "Datum:" Label3.Text = Globals.Versionastaum Label5.Text = "Stefan Hutter Unternehmensberatung" Label6.Text = "Staldenbachstrasse 13" Label7.Text = "8808 Pfäffikon SZ" End Sub End Class