Cara Simple Membuat Form Login Vb.net

Visual Studio

Visual studio merupakan sebuah perangkat lunak lengkap (suite) yang dapat digunakan untuk melakukan pengembangan aplikasi, baik itu aplikasi bisnis, aplikasi personal, ataupun komponen aplikasinya, dalam bentuk aplikasi console, aplikasi Windows. Microsoft Visual Studio dapat digunakan untuk mengembangkan aplikasi dalam native code (dalam bentuk bahasa mesin yang berjalan diatas windows) ataupun managed code , VS juga dapat digunakan untuk mengambangkan app Silverlight, aplikasi windows mobile.

Berikut ada langkah langkahnya : 

1. Buat Database menggunakan Sql Server, disini saya menggunkan sql server 2008 r2. Namai db          tadi dengan nama yang singkat namun jelas misalnya : db_latihan

2. Buat Table pada db tadi, beri nama table : tb_login. Adapun jumlah Fiednya dibawah ini :

3. Buat form loginnya di VB, sebelum membuat pastikan VB sudah terkoneksi ke sql servernya, saya anggap teman teman sudah bisa membuatnya. Sesuaikan komponen desain form login seperti dibawah ini :

Untuk nama komponen desain tersebut ada dibawah ini :

Komponen                                        Name                                            Text

Picture box                                        Pcb                                                    -

Group Box                                        Group box                                          -

Label                                                Lbl_judul                                      Form Login

Label                                                Lbl_nama                                      Username :

Label                                                Lbl_sandi                                      Password :

Textbox                                            Txt_nama                                      Txt_nm

Textbox                                            Txt_sandi                                       Txt_pass

Button                                              Masuk                                             Btn_msk

Button                                              Batal                                                Btn_btl

                                            Untuk textbox sandi UseSystemChar  = *

4. Jangan lupa siapkan form untuk aksi selanjutnya : 

Disini saya menggunakan MDI Parent

Masukkan syntx dibawah ini pada Button Masuk

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        koneksi()

        If txt_nm.Text = "" Then

            MsgBox("Namanya Siapa..")

        ElseIf txt_pass.Text = "" Then

            MsgBox("Passwordnya Apa..")

        Else

            koneksi()

            Dim query = "select * from tb_login where username = '" & txt_nm.Text & "'"

            Dim cmd = New SqlCommand(query, conn)

            Dim dr = cmd.ExecuteReader

            dr.Read()

            If dr.HasRows Then

                koneksi()

                Dim query1 = "select * from tb_login where password = '" & txt_pass.Text & "'"

                Dim cmd1 = New SqlCommand(query1, conn)

                Dim dr1 = cmd1.ExecuteReader

                dr1.Read()

                If dr1.HasRows Then

                    MsgBox("Selamat Datang " & dr!username)

                    MDIParent1.Show()

                    Me.Hide()

                Else

                    MsgBox("Passwordnya salah!", vbCritical, "")

                    txt_pass.Clear()

                End If

            Else

                MsgBox("Usernamenya salah!", vbCritical, "")

                txt_nm.Clear()

            End If

        End If

    End Sub

     Itulah cara simple untuk membuat form login versi saya, jika ada salah saya mohon maafnya sebesar besarnya, jangan lupa komen Punten Slurr