Membuat Form Login Versi 1

Menu Login / Form sering kita jumpai di aneka macam kegiatan maupun website, tujuan dari hidangan login dibentuk (menurut saya) hanya untuk memverifikasi keanggotaan / kepemilikan sebuah web / program, jadi dengan adanya form login tidak sembarang orang sanggup memakai kegiatan tersebut, hanya orang - orang yang tergabung / mengetahui data login yang sanggup menggunakannya.
Untuk menciptakan kegiatan login sendiri di visual basic sangatlah beragam, tergantung dari fungsi dan fitur hidangan login tersebut, namun sebelum anda menciptakan hidangan login, ada baiknya anda mengetahui terlebih dahulu konsep / cara kerja  dari hidangan login, cara kerja hidangan login ialah mencocokan form isian dengan data yang telah di buat sebelumnya, apabila data cocok maka akan muncul sebuah pesan, dan apabila data cocok maka anda akan di arahkan ke form selanjutnya.

Sebagai pengenalan terhadap hidangan login, kali ini aku akan menciptakan sebuah kegiatan hidangan login sederhana, dimana data login tidak sanggup di rubah saat kegiatan dijalankan, dan kita akan memunculkan pesan saat ada form isian kosong, saat data tidak cocok, dan pesan saat berhasil login, oke berikut tutorialnya :

(Untuk menciptakan Form Login, kali ini kita akan memakai 2 Form)
1. Seperti biasa buat kegiatan Standar EXE
2. kemudian tambahkan 1 form lagi
Cara Menambahkan Form Baru di Visual Basic
Klik hidangan Project > Add Form > Pilih Form > Open
3. Tambahkan 2 label, 2 text box dan 2 command button di form1, kemudian rubah propertiesnya :
Tool BoxPropertiesKeterangan
Form1Start UpCenter Screen
Label 1CaptionUsername
Label 2Password
Text 1Text(Kosong)
Text 2Text
Password Char*
Command 1CaptionLOGIN
Command 2END
AllFont Size10

Sehingga tampilannya ibarat ini :

4. Lalu di form2 tambahkan 2 command button saja
Tool BoxPropertiesKeterangan
Form2Start UpCenter Screen
Command 1CaptionTRY AGAIN
Command 2END
AllFont Size10

Sehingga ibarat ini untuk tampilan Form 2

5. Tuliskan script berikut di form 1 :

Private Sub Command1_Click()
'Pesan Jika text1 dan text2 dalam keadaan kosong
If Text1 = "" Or Text2 = "" Then
MsgBox "Please, Complete the Form !", vbInformation, "Routeros Mikrotik"

ElseIf Text1.Text = "Routeros Mikrotik" And Text2.Text = "Visual Basic" Then
'Untuk Username nya adalag Routeros Mikrotik dan Passwordnya Visual Basic
'Anda sanggup menggantinya sesuai cita-cita anda
MsgBox "Welcome", vbInformation, "Routeros Mikrotik"
Form5.Hide
Form6.Show
Else

'Pesan kalau anda salah memasukan Username dan Password
MsgBox "Username or Password Invalid, Please Try Again !", vbCritical, "Routeros Mikrotik"
Text1 = ""
Text2 = ""
Text1.SetFocus
End If
End Sub

Private Sub Command2_Click()
End
End Sub

dan tuliskan script berikut di form 2 :

Private Sub Command1_Click()
Form5.Show
Form6.Hide
Form5.Text1.Text = ""
Form5.Text2.Text = ""
Form5.Text1.SetFocus
End Sub

Private Sub Command2_Click()
End
End Sub

6. Jalankan program
Tampilan Awal Program
Masukan Data Login
Pesan saat data login yang di masukan benar
Tampilan Form 2
Pesan saat text1 dan text2 kosong
Pesan saat salah memasukan data
Sekilas mengenai kegiatan login diatas, saat username dan password yang di masukan benar, maka anda akan di arahkan ke kegiatan selanjutnya (Form2), sebab form2 di tutorial ini hanya berisi 2 command button saja, maka silahkan isi form 2 dengan toolbox atau kegiatan yang ingin kalian buat, 
Namun kekurangan dari kegiatan login diatas ialah kita tidak sanggup mengubah Username dan Password saat kegiatan di jalankan,

Itulah tutorial mengenai cara menciptakan hidangan login,
Sekian tutorial kali ini, agar bermanfaat

Comments