Koding Logout Dengan VB 6.0

Pada Artikel Pintar VB kali ini  adalah cara membuat Koding Logout pada Aplikasi VB 6.0. Jika pada Tutorial Visual Basic Login ada beberapa teman kita yang menanyakan cara Logout, berikut kami Uraikan di Artikel ini .

Sebelum lebih jauh tentang Koding Logout, kami akan membahas tentang Logika dari Logout terlebih dahulu :
- Logout adalah kebalikan dari Login
- Berarti Kondisi Logout adalah mengembalikan Kondisi sebelum Login.

Jika pada Tutorial kami sebelumnya tentang car membuat Login pada VB 6.0 pada Menu Utama sebelum login maka menu Master, Transaksi dan Laporan dalam Kondisi DISABLE, nah DISABLE inilah yang akan kita panggil jika Klik Menu Logout.

Kondisi DISABLE atau Terkunci :

Sub Terkunci()
MnLogin.Enabled = True
MnLogout.Enabled = False
MnMaster.Enabled = False
MnTransaksi.Enabled = False
MnLaporan.Enabled = False
End Sub

Masukan Koding diatas pada FormMenuUtama.

Sub Terbuka()
FormMenuUtama.MnLogin.Enabled = False
FormMenuUtama.MnLogout.Enabled = True
FormMenuUtama.MnMaster.Enabled = True
FormMenuUtama.MnTransaksi.Enabled = True
FormMenuUtama.MnLaporan.Enabled = True
End Sub

Masukan Koding diatas ketika Sukses Login.

Kemudian untuk Koding Logout kita hanya panggil Kondisi Terkunci :

Private Sub MnLogout_Click()
    If MsgBox("Yakin Akan Logout Dari Program?", vbYesNo) = vbYes Then
            Call Terkunci
    End If
End Sub

Cukup Mudah bukan????
Untuk Source Code dari Pembelajaran diatas, anda bisa KLIK LINK INI

Salam
Pintar VB | Tutorail VB 6.0 dan VB .Net

Tweet