Cara Membuat Menu Login Tanpa Database di VB 6.0 Gampang Tanpa Ribet

Cara membuat menu Login di Visual Basic 6.0 Tanpa Database 

Assalamu'alaikum Selamat Datang di Fitriidris kali ini kita bakalan berbagi tips/cara membuat menu Login di Microsoft Visual Basic 6.0 Tanpa Database yang pastinya gampang banget tanpa ribet.

Okee langsung saja kita ke Langkah-Langkah pembuatannya aja..

1.Silakan buka Microsoft Visual Basic 6.0

2.Pilih 'Standar Exe' dan klik 'Open'

3.Atur Ukuran Form seperti yang diinginkan

4.Tambahkan 3 Label,2 Text Box dan 3 Command Button 

 -Label1 untuk Judul ‘Form’ 

 -Label2 untuk Judul ‘Username’ 

 -Label3 untuk Judul ‘Password’ 

 -Textbox1 untuk Menuliskan nama Username 

 -Textbox2 untuk Menuliskan nama Password 

 -Command Button1 untuk ’Login’ 

 -Command Button2 untuk ‘Reset’ 

 -Command Button3 untuk ‘Kembali’ 

 5.Klik Label dan Perhatikan Properties pada Bagian Label cari pilihan

'Caption' (untuk merubah nama), 

'Font' (untuk merubah jenis,model dan ukuran), 

'Back Style' (ubah menjadi Transparan)

 

 6.Klik Textbox dan Perhatikan Properties pada Bagian Textbox cari pilihan

 'Text'Lalu kosongkan

 -Untuk Textbox2,silakan 'kosongkan' pada pilihan Text dan Cari pilihan Password Char 'ubah menjadi simbol Bintang'- 

7.Klik Command Button dan Perhatikan Properties pada Bagian Command Button cari pilihan 

'Caption' (untuk merubah nama), 'Font' (untuk merubah jenis,model dan ukuran) 

 8.Double Klik pada Form Lalu Masukkan Script 

 Private Sub Form_Load()

 Me.BackColor = RGB(20, 25, 55) 

 End Sub 

 9.Double Klik pada 'Login' Lalu Masukkan Script

 Private Sub Command1_Click()

 If (Text1.Text = "Ayo Belajar") And (Text2.Text = "Belajar") Then 

 MsgBox "Anda Berhasil Login", vbOKOnly + vbInformation, "Berhasil Login"

 Form1.Hide 

 Form2.Show

 Else

 MsgBox "Silakan Cek Usename dan Pasword Anda", vbYesNo + vbInformation, "Login Gagal" 

 End If 

 End Sub 

 10.Double Klik pada 'Reset' Lalu Masukkan Script

 Private Sub Command2_Click() 

Text1.Text = ""

Text2.Text = ""

End Sub 

 11.Double Klik pada 'Kembali' Lalu Masukkan Script 

 Private Sub Command3_Click() 

 Unload Me 

 End Sub 

 12.Tambahkan Form 2 (Untuk Menu Berikutnya) 

 Tampilan Sebelum dijalankan 

 Tampilan setelah dijalankan 

 Silakan Mampir juga ya untuk Tutorial Cara Membuat Menu Utama

Bagikan Artikel ini