Timid Ninja !

It is during our darkest moments that we must focus to see the light.

Mau berbagi aja sama yang baru banget belajar VB kita sama sama belajar, sekalian ngisi ini blog gak ada isinya gak enak dilihatnya, jadi maap kalo ada salah salah dikit ya semua yang jago kan dimulai dari newbie dulu :)

بسم الله الرحمن الرحيم





Cara Membuat Form Login dengan kondisi If Then Else dan MsgBox



1.          Buatlah 3 Label, 2 TextBox dan 1 CommandButton pada form baru seperti diatas.



2.  Lalu Ganti Caption “Label1 = Form Login“, “Label2 = Username”, “Label3 = Password”, “Command1 =  Login” lalu kosongkan “Text1” dan “Text2”, khusus untuk Text2 isilah lambang “*” pada Properties Box bagian PasswordChar agar password yang diketikan menjadi tidak timbul atau terlihat tampilan **** .


3.  Setelah itu tulislah Codingan untuk FormLogin, klik duakali pada Command1/Login, lalu akan timbul jendela Code Window seperti ini. Lalu tuliskan Codingannya.


Penjelasan Coding!


1. If Text1.Text = "Ridwan" And Text2.Text = "kepodeh" Then  merupakan struktur keputusan dimana Bila <kondisi> bernilai True maka <blok kode program 1> akan dikerjakan, tetapi bila <kondisi> bernilai False maka <blok kode program 2> yang akan dikerjakan. Disini  bila kotak username diisi dengan “Ridwan” dan kotak password diisi dengan “kepodeh” lalu di klik login maka program akan memberikan respon 


atau ini disebut juga dengan blok kode program1 yang berarti bila username dan password benar. Bila kotak username dan password diisi dengan sembarang kalimat maka yang akan timbul adalah 

atau ini yang disebut dengan blok kode program2 yang berarti bila username/password salah.

2.  kotak = MsgBox("Selamat Datang", vbOKOnly, "Login Succes!") merupakan blok kode program1. MsgBox merupakan perintah untuk memunculkan popup kotak pesan. “Selamat Datang” merupakan prompt, “vbOKOnly” merupakan atribut jika benar, “Login Succes!” merupakan judul kotak popup.



3.  Else merupakan command untuk menetukan bentuk blok kode program lain yang berbeda.

4.  kotak = MsgBox("Username/Password salah", vbCritical, "Login Failure!") merupakan blok kode program2. MsgBox merupakan perintah untuk memunculkan popup kotak pesan. “Username/Password salah” merupakan prompt, “vbCritical” merupakan atribut jika salah, “Login Failure!” merupakan judul kotak popup.

5.  END IF merupakan command penutup yang harus ditulis jika kita menggunakan struktur IF...THEN.








0 komentar:

Posting Komentar

Student Site

BAAK Gunadarma

Berita Student Site

Total Tayangan Halaman

Diberdayakan oleh Blogger.