Kita Langsung saja ya...!!!
Buka Program Visual Basic yang sudah terinstal di PC or Laptop anda.!
Seperti Biasa, mulai dengan membuka Programnya.!
|
Gambar 1.1 |
START > All Program > Microsoft Visual Studio 6.0> Microsoft Visual 6.0
Tampilannya akan tampak seperti gambar di bawah ini...
|
Gambar 1.2 |
Kemudian Buatlah Sebuah Form baru seperti di Bawah ini..!
|
Gambar 1.3 |
Nah Sekarang buatlah object Lingkaran.
Warnai obyek lingkaran tersebut dengan warna merah saja. Nah warna dari lingkaran itulah yang akan kita buat kedap kedip menjadi warna Biru,Kuning, dan Merah... Secara berulang, sesuai dengan Interval Timer yang kita Setting.
Langkahnya:
|
Gambar 1.4 |
1. Buatlah Obyek Lingkaran, jika tampil kotak maka anda harus rubah di bagian
Properti di sebelah kanan Di sana ada shape, anda pilih Circle. Lihat Gambar di sebelah kiri......... Yaaaaa....!!
2. Kita Masukkan timer pada Formnya, atur intervalnya menjadi 250
Double click Timernya, And Masukkan Codingnya Di dalam Timer1 itu...
Lihat Gambar Form Beserta Timer di dalamnya.! (
Gambar 1.5)
Masukkan Codingnya.. Berikut Coding Sederhananya!!!
Private Sub Timer1_Timer() If Shape1.BackColor = &HFF& Then Shape1.BackColor = vbBlue |
Gambar 1.5 |
ElseIf Shape1.BackColor = vbBlue Then Shape1.BackColor = vbYellow Else Shape1.BackColor = &HFF& End If
End SubNah Jika Coding yang anda masukkan benar dan betul.. He.. Maka Lingkaran yang warna merah akan berubah menjadi warna Biru dan kuning....
Oya.. Code Warna bisa dicopykan atau ditulis dengan awalan VB(
color name)
Infonya bagus sekali dan berguna bg kami yang masih baru dlm blog,teruslah menulis kami memerlukan... Teruskan juga mendodoq tidur lena generasi desa kita.
BalasHapus