Hal-hal yang diperukan
1.Aplikasi Visual Basic 6.0 ,…..
2.Rasa Yakin Dan Percaya Bahwa Anda Pasti Bisa
Ok langsung aja masu ke materi pembahasannya,…..
Buka Aplikasi Visual Basic 6.0 -> Standard EXE -> OK maka akan tampil form baru sesuai dengan gambar di bawah,desain form sesuai keinginan anda. Seperti gambar dibawah ini
Setelah Aplikasi Visual Basic Anda terbuka ,.. Lalu Masukan :
2 Buah Command Button 1 buah TextBox Seperti Gambaar Di Bawah ini:
Kemudian Pada Command1
Caption : Genarate
Pada Command2
Caption : Cancel
Pada Text1
Text :””
Hingga Form Tersebut Menjadi Seperti Gambar Di bawah ini:
Setelah Semua Tools Yang diperlukan Selesai,..lalu klik 2 kali di tombol GENERATE yang tadi kita ganti tulisan nya Dengan Kode Di bawah ini
Code
TextBox1.Text = Int(Rnd() * 4)
Select Case TextBox1.Text
Case 0
TextBox1.Text = "Key Terserah Anda"
Case 1
TextBox1.Text = " Key Terserah Anda "
Case 2
TextBox1.Text = " Key Terserah Anda "
Case 3
TextBox1.Text = " Key Terserah Anda "
End Select
Select Case TextBox1.Text
Case 0
TextBox1.Text = "Key Terserah Anda"
Case 1
TextBox1.Text = " Key Terserah Anda "
Case 2
TextBox1.Text = " Key Terserah Anda "
Case 3
TextBox1.Text = " Key Terserah Anda "
End Select
Kemudian klik 2 kali Tombol Cancel,..Lalu Masukan Kode Berikut ini
Code:
Unload me
Dan Setelah Semua Kode Dimasukan Dalam Form Tekan F5 Untuk Mencobanya,…
Semoga Berhasil,…………….Source: http://dewa-sumberilmu.blogspot.com/
No comments:
Post a Comment