neu

AVISO_CHECKIN/usrCntlWelcome.vb

@@ -0,0 +1,26 @@
+Public Class usrCntlWelcome
+
+    Dim MAIN As frmCheckIn
+    Sub New(MAIN)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+        Me.MAIN = MAIN
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+
+    End Sub
+
+
+    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click, Label1.Click, Button1.Click, Label2.Click, Button2.Click, Label3.Click, Button3.Click, Label4.Click
+        MAIN.SET_LANGUAGE(sender.tag)
+        MAIN.SET_SEARCH()
+    End Sub
+
+    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
+
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+
+    End Sub
+End Class