kali ini saya akan membagikan pengetahuan kepada teman-teman semua bagaimana cara membuat teks pada visual basic berkedip atau blink secara sederhana, mengapa saya bilang sederhana? karena memang listingnya tidak terlalu panjang, hanya kurang lebih 4 baris kita sudah bisa membuat teks tersebut berkedip sesuai dengan warna yang kita inginkan.
Ok, tanpa berlama-lama kita langsung saja mulai.
Langkah pertama tentu kita buka program vb terlebih dahulu, setelah itu masukkan satu buah objek label dan time, jangan lupa rubah captionnya sesuai dengan keinginan anda.
langkah berikutnya kita ubah propertis dari time, yaitu pada bagian interval, ganti menjadi 500, ingat semakin kecil nilai interval semakin cepat dia berkedip atau blink
setelah itu kita tulis listing pada timernya
Private Sub Timer1_Timer()
If Label1.ForeColor = vbRed Then
Label1.ForeColor = vbBlue
Else
Label1.ForeColor = vbRed
End If
End Sub
langkah terakhir, jalankan program, lihat hasilnya
cukup mudah kan
0 komentar:
Posting Komentar