Initial commit

Form3.vb

@@ -0,0 +1,22 @@
+Public Class Form3
+
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+
+
+        If TextBox1.Text = My.Settings.adminPass Then
+            Form4.Show()
+            Me.Close()
+        Else
+            MsgBox("Introdu Parola de admin corecta")
+            TextBox1.Clear()
+            TextBox1.Focus()
+
+        End If
+
+    End Sub
+
+    Private Sub FlowLayoutPanel1_Paint(sender As Object, e As PaintEventArgs) Handles FlowLayoutPanel1.Paint
+
+    End Sub
+End Class