Membuat Menu Login Visual Basic

Posted on
Cara membuat menu atau Form Login di Visualbasic .Net

Membuat form login atau menu login ini merupakan artikel lanjutan project kita, kemarin kita telah berhasil membuat pencarian atau search data menggunakan program Visualbasic .Net.

Kali ini kita akan membuat menu atau form loginnya, program aplikasi yang dilengkapi menu login sudah jelas banyak sekali, karena membuat form login mempunyai banyak manfaat diantaranya untuk mencegah (menghandle) orang yang tidak berkepentingan atau orang yang tidak bertanggung jawab masuk kedalam aplikasi atau program yang kita buat.

Untuk membuat form atau menu login pada Visualbasic .Net ikuti langkah-langkah berikut ini:

1. Tambahkan sebuah form, beri nama Form_Login.

2. Pada form login tersebut tambahkan dua (2) buah Textbox dan dua (2) buah button.

3. Beri nama Textbox “TUSERNAME” dan “TPASSWORD”, untuk buttonnya ubah saja Textnya dengan “MASUK” dan “BATAL”.

4. Setelah itu tambahkan kode dibawah ini diatas dan dibawah Public Class seperti ini strukturnya:

Imports System.Data.OleDb
‘Public Class Form_Login ///Taruh kode diatas tepat diatas dari kode disamping, dan taruh kode dibawah tepat dibawah kode disamping, strukturnya seperti itu sesuaikan dengan project Anda.
#Region “deklarasi”
    Dim myconnection As New accessdata.koneksidata
    Dim objconnection As OleDbConnection
    Dim mycmd As OleDbCommand
    Dim objdataadapter As OleDbDataAdapter
    Dim objdatareader As OleDbDataReader
    Dim objdataset As New DataSet
    Dim objdatatable As New DataTable
#End Region

5. Yang berwarna biru itu adalah Public Class, letak kodenya ada diatas, carilah di Project Anda, sedangkan yang berwarna merah adalah kode yang perlu Anda tambahkan.

6. Sekarang klik dua kali pada button masuk, dan tambahkan kode atau scriptnya seperti berikut ini:

 Try
            Dim DA As OleDb.OleDbDataAdapter
            DA = New OleDb.OleDbDataAdapter(“SELECT * from inavb where username= ‘” & Replace(Me.TUSERNAME.Text, “‘”, “””) & “‘ AND password='” & Replace(Me.TPASSWORD.Text, “‘”, “””) & “‘”, koneksidata.pencarian)
            Dim DT1 As New DataTable
            DT1.Clear()
            DA.Fill(DT1)
            If DT1.Rows.Count = Nothing Then
                MsgBox(“Username atau Password Salah !!”, MsgBoxStyle.Critical, “Message !!”)
                Me.TPASSWORD.Text = “”
                Me.TUSERNAME.Text = “”
                Me.TPASSWORD.Focus()
            Else
                Me.Hide()
                FORM_LOADING.Show()
                myconnection.close()
            End If
        Catch ex As Exception
            MsgBox(“CEK KEMBALI DATA ADA YANG SALAH !!”, MsgBoxStyle.Critical, “Message !!”)
        End Try

7. Tambahkan pula pada button batalnya dengan kode seperti ini:

        TUSERNAME.Text = “”
        TPASSWORD.Text = “”

8. Selesai, itulah cara membuat Form atau Menu Login di program Visualbasic .Net, berikut akan di jelaskan sedikit mengenai kode program tersebut.

– Kode yang pertama di poin nomor 4 adalah kode deklarasi, baca artikel Cara menyimpan data di Visualbasic .Net untuk lebih jelasnya.

– Kode yang kedua di poin nomor 6 adalah kode untuk masuk atau login itu sendiri, terdapat perintah SQL “SELECT * from inavb where username= ‘” & Replace(Me.TUSERNAME.Text, “‘”, “””) & “‘ AND password='” & Replace(Me.TPASSWORD.Text, “‘”, “””) & “‘”, koneksidata.pencarian.

– Perintah diatas akan mencari data pada tabel inavb dimana field username=TUSERNAME.Text dan field password=TPASSWORD.Text, artinya user akan masuk jika dua kondisi ini benar (terpenuhi), dalam kata lain pada tabel inavb terdapat username dan password yang sama dengan yang diketikkan pada Textbox.

– Sedangkan kode untuk poin nomor 7 adalah kode untuk membersihkan TUSERNAME dan TPASSWORD.

Seperti itulah keseluruhan penjelasan cara membuat menu atau form login di Program Visualbasic .Net, untuk lebih jelasnya silakan Anda lihat Video tutorial yang sudah Saya praktekkan dibawah ini.

Download Video
Download Code