Cara Membuat Form Login di VB.NET

Form login sangat erat kaitannya dengan aplikasi yang berhubungan dengan database. Form login di aplikasi desktop tentu saja berbeda dengan website di mana di seluruh halaman mereka bisa menempatkan form loginnya, sedang di aplikasi desktop biasanya ditempatkan di halaman awal.  Hal ini wajar,mengingat website bekerja dengan menggunakan session, sedangkan aplikasi desktop tidak mengenal yang namanya session.Pada tutorial ini dalam pembuatan form login menggunakan konsep di mana form utama dan form login tampil bersamaan, akan tetapi form login di show modal sehingga user tidak bisa mengakses form utama seperti gambar di atas.

Yang perlu dipersiapkan tentu saja 2 buah form yaitu Form utama (kita namai dengan Form1) dan FormLogin (kita namai dengan FrmLogin).  Taruh di form login tersebut 2 buah button satu untuk OK(kita namai btnok) dan satu untuk Cancel(kita namai btncancel), dan juga sebuah textbox untuk password(kita namai dengan txtpassword).

Jika sudah, setting property DialogResult btncancel tersebut dengan Cancel, sedang untuk property komponen lainnya kita biarkan nilainya default dari VB.NET.

Setelah itu taruh script berikut di Form1 event OnLoad


Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        WindowState = FormWindowState.Maximized
        AddHandler FrmLogin.btnok.Click, AddressOf OnLoginClick
        FrmLogin.ShowDialog()

End Sub

Penjelasan:

  • Windowstate=Maximized, opsional, anda bisa menyettingnya saat design time.
  • Event tombol OK click ditempatkan di form utama agar mudah untuk menambah method sesudah login berhasil.

Dan berikut script untuk OnLoginClick


    Private Sub OnLoginClick(sender As Object, e As EventArgs)
        With FrmLogin
            If .txtpassword.Text <> "password" Then
                MsgBox("Password error")
            Else
                .DialogResult = Windows.Forms.DialogResult.OK
                 ' tambahkan method di sini misal aturmenu.

            End If
        End With
    End Sub

Penjelasan:

Property DialogResult=OK menandakan form ditutup.  Property tersebut berbeda dengan perintah close karena saat close Form login tersebut property DialogResultnya adalah None.
Jika langkah tersebut sudah dilakukan, tambahkan script berikut saat di event FormClosed Form Login:


    Private Sub FrmLogin_FormClosed(sender As Object, e As FormClosedEventArgs) Handles MyBase.FormClosed
        If Not (DialogResult = Windows.Forms.DialogResult.OK) Then
            Application.Exit()

        End If
    End Sub

Penjelasan:

Saat user menekan tombol cancel form juga menutup, demikian juga saat menekan tombol close yang ada di pojok kanan atas.  Jika tidak dibedakan dari property DialogResultnya maka itu sama dengan menutup form login saja sehingga user bisa langsung mengakses form utama.  Karena itulah kita menset jika DialogResult bukan OK maka aplikasi akan berhenti.

Untuk contoh lebih jelasnya anda bisa mendownload attachment di bawah.

Attachments

anasmbahdien

Seorang programmer yang menguasai bahasa pemograman Delphi, VB.NET, PHP dan Android. Untuk hasil karya kunjungi mogotekno.com

Tinggalkan Balasan

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *