♻️ login event

Author: i-naeem

Login.vb

@@ -9,34 +9,36 @@ Public Class Login
         Dim username As String = UsernameTextBox.Text
         Dim password As String = PasswordTextBox.Text
 
-        ' Check if password or username is empty give error
+        'Check if password or username is empty give error
         If String.IsNullOrEmpty(username) Or String.IsNullOrEmpty(password) Then
             MessageBox.Show("Username or email can not be empty.")
-        Else
-            ' Creates a query to select user.
-            Dim query As String = "SELECT * FROM users_table WHERE username = '" + username + "' AND password = '" + password + "'"
+            Return
+        End If
 
-            Dim cmd As New SqlDataAdapter(query, con)
-            Dim dt As New DataTable()
+        'Creates a query to select user.
+        Dim query As String = "SELECT * FROM users_table WHERE username = '" + username + "' AND password = '" + password + "'"
 
-            ' Fill the data table with results from database
-            cmd.Fill(dt)
+        Dim cmd As New SqlDataAdapter(query, con)
+        Dim dt As New DataTable()
 
-            ' Check if user exist with given username and password
-            If dt.Rows.Count > 0 Then
-                ' Hide the login form
-                Me.Hide()
+        'Fill the data table with results from database
+        cmd.Fill(dt)
 
-                ' Reset the username and password input.
-                UsernameTextBox.Text = ""
-                PasswordTextBox.Text = ""
+        'Check if user exist with given username and password
+        If dt.Rows.Count = 0 Then
+            MessageBox.Show("Incorrect Username or password.")
+            Return
+        End If
 
-                ' Show the dashboard form
-                Dashboard.Show()
-            Else
-                MessageBox.Show("Username or password is incorrect")
-            End If
+        'Hide the login form
+        Me.Hide()
+
+        'Reset the username and password input.
+        UsernameTextBox.Text = ""
+        PasswordTextBox.Text = ""
+
+        'Show the dashboard form
+        Dashboard.Show()
 
-        End If
     End Sub
 End Class