Initial commit

BEA - Kopie/Diverse Formulare/frmAbout.vb

@@ -0,0 +1,12 @@
+Public Class frmAbout
+
+    Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
+        Me.Close()
+    End Sub
+
+    Private Sub frmAbout_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
+        Me.lblVersion.Text = "Version " & Globals.clsapplication.sVersion.Value
+        Me.lblversiondatum.Text = Globals.Versionsdatum
+
+    End Sub
+End Class