VB.Net Login Window
Affichage des articles dont le libellé est VB.Net Login Window. Afficher tous les articles
Affichage des articles dont le libellé est VB.Net Login Window. Afficher tous les articles

VB.Net - Design Login Form

Add Comment

How To Design a Login Form In Visual Basic.Net 

Design Login Form Using VB.Net
In This VB.Net Tutorial We Will See How To  Make a Login Form Design Using Panel, Button, Labels, Textboxes and Using Visual Basic.Net Programming Language And Visual Studio Editor.

 - To Learn More Watch The Video Tutorial Below. 


Project Source Code:

Public Class Design_Login_Form

    ' form load
    Private Sub Design_Login_Form_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        ' set backgroundcolors, forcolors
        ' borders size, color
        ' flat style
        Panel1.BackColor = Color.FromArgb(120, 0, 0, 0)
        Panel2.BackColor = Color.FromArgb(120, 0, 0, 0)

        Label1.BackColor = Color.Transparent
        Label2.BackColor = Color.Transparent
        Label3.BackColor = Color.Transparent

        Label1.ForeColor = Color.White
        Label2.ForeColor = Color.White
        Label3.ForeColor = Color.White

        Button_Close.FlatStyle = FlatStyle.Flat
        Button_Minimize.FlatStyle = FlatStyle.Flat
        Button_Close.FlatAppearance.BorderSize = 0
        Button_Minimize.FlatAppearance.BorderSize = 0

        TextBoxUsername.BackColor = Color.Gray
        TextBoxPassword.BackColor = Color.Gray

        TextBoxUsername.ForeColor = Color.Yellow
        TextBoxPassword.ForeColor = Color.Yellow

        Button_Login.FlatStyle = FlatStyle.Flat
        Button_Login.BackColor = Color.FromArgb(39, 174, 96)
        Button_Login.ForeColor = Color.White
        Button_Login.FlatAppearance.BorderColor = Color.White


    End Sub

    ' button minimize mouse hover
    Private Sub Button_Minimize_MouseHover(sender As Object, e As EventArgs) Handles Button_Minimize.MouseHover

        Button_Minimize.FlatAppearance.BorderSize = 1
        Button_Minimize.FlatAppearance.BorderColor = Color.White

    End Sub

    ' button minimize mouse leave
    Private Sub Button_Minimize_MouseLeave(sender As Object, e As EventArgs) Handles Button_Minimize.MouseLeave

        Button_Minimize.FlatAppearance.BorderSize = 0

    End Sub

    ' button close mouse hover
    Private Sub Button_Close_MouseHover(sender As Object, e As EventArgs) Handles Button_Close.MouseHover

        Button_Close.FlatAppearance.BorderSize = 1
        Button_Close.FlatAppearance.BorderColor = Color.White

    End Sub

    ' button close mouse leave
    Private Sub Button_Close_MouseLeave(sender As Object, e As EventArgs) Handles Button_Close.MouseLeave

        Button_Close.FlatAppearance.BorderSize = 0

    End Sub

    ' button to close the form
    Private Sub Button_Close_Click(sender As Object, e As EventArgs) Handles Button_Close.Click

        Close()

    End Sub

    ' button to minimize the form
    Private Sub Button_Minimize_Click(sender As Object, e As EventArgs) Handles Button_Minimize.Click

        WindowState = FormWindowState.Minimized

    End Sub
End Class  
   


///////////////OUTPUT:











How To Design a Login Form In VB.Net






















  
      








    
    


 


















            

          

          

        

          

        













VB.Net Login Form




















2 Comments




































VB.NET - How To Create Login Form With SQL Server DataBase With Source Code



                                                                                                                         





In This VB.NET Tutorial We Will See How To Make Login Window With Microsoft SQL DataBase And Visual Basic .NET Programming Language.













  
          
    
  

  


Project Source Code:







Imports System.Data.SqlClient







Public Class VBNET_Login_Form_With_SQL







    Private Sub BTN_LOGIN_Click(sender As Object, e As EventArgs) Handles BTN_LOGIN.Click







        Dim connection As New SqlConnection("Server= SAMSNG-PC; Database = TestDB; Integrated Security = true")







        Dim command As New SqlCommand("select * from Table_Login where Username = @username and Password = @password", connection)







        command.Parameters.Add("@username", SqlDbType.VarChar).Value = TextBoxUsername.Text



        command.Parameters.Add("@password", SqlDbType.VarChar).Value = TextBoxPassword.Text







        Dim adapter As New SqlDataAdapter(command)







        Dim table As New DataTable()







        adapter.Fill(table)







        If table.Rows.Count() <= 0 Then







            MessageBox.Show("Username Or Password Are Invalid")







        Else







            'MessageBox.Show("Login Successfully")







            Dim frm As New VBNET_SQL_Insert_Update_Delete()







            Me.Hide()







            frm.Show()







        End If







    End Sub







    Private Sub BTN_CANCEL_Click(sender As Object, e As EventArgs) Handles BTN_CANCEL.Click







        Me.Close()







    End Sub



End Class






///////////////OUTPUT:

























vb.net login form with sql database






















      








    
    


 

    















        

      















Inscription à :
Articles (Atom)