Cara membuat login pada VB.net 

dengan mudah

Setelah pembuatan module koneksi selesai, selanjutnya ke pembuatan menu login. Langsung saja ke pembahasan. Ikuti langkah-langkah di bawah ini.

Cara membuat module koneksi

1. Buat form baru dengan cara klik project => add windows form => berinama login => add. lihat gambar di bawah.

2. Desain form login seperti gambar di bawah

3. Buat lagi form baru untuk tampilan pertama setelah login => desain seperti gambar di bawah => buat posisi awal tampilan berada di tengah layar (perhatikan bagian kanan bawah yang di lingkari) => WindowsDefaultLocation ganti dengan CenterScreen.

4. Klik 2x pada form login => isi koding seperti berikut.

Imports System.Data.OleDb

Public Class login

    Sub login()
        cmd = New OleDbCommand("select * from tbl_login where username='" & TextBox1.Text & "' and password='" & TextBox2.Text & "'", conn)
        dr = cmd.ExecuteReader
        dr.Read()
    End Sub

    Sub kosong()
        TextBox1.Text = ""
        TextBox2.Text = ""

        TextBox1.Focus()
    End Sub

    Private Sub login_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Call koneksi()
        TextBox1.Focus()
    End Sub


5. Klik 2x pada button login => isikan koding sebagai berikut.

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Call login()
        If dr.HasRows Then
            Me.Hide()
            Form1.Show()
        Else
            MsgBox("Username/password yang anda masukan salah")
        End If
    End Sub


6. Klik 2x pada button batal => isikan koding sebagai berikut.

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Call kosong()
    End Sub
End Class

Untuk lebih jelasnya lihat gambar di bawah.

7. Setelah itu jalankan program/start => isikan username dan password => maka akan tampil tampilan utama seperti yang kita buat di langkah 3 tadi.

Selanjutnya akan saya teruskan dengan pembuatan SIMPAN, EDIT, DELETE, PENCARIAN. Sekian dan semoga bermanfaat. Terimakasih.