Membuat Label Berkedip [VB6]

Selamat Malam para pencari ilmu yang  :) hhe.. kali ini saya akan share cara membuat Label/Text Berkedip-kedip, untuk latihan kita coba menggunakan label. Sambil saya belajar sambil saya juga berbagi ilmu kepada anda yang membutuhkan :D . oke langsung saja kita masuk kepembahasan.

Bahan dan langkah-langkah :
-    Siapkan dlu Visual Basic 6-nya.. jika anda blum punya Visual Basic 6-nya silahkan download dan install dlu (link donlot ada d'blog ini juga silahkan cari sendiri hhe..)
-    Buka Visual Basic 6-nya
-    Buat 1 Form, 1 Label dan 1 Timer (Lihat gambar)
-    Masuk ke Windows Code (Jendela Kode), jika kurang mengerti anda bisa Double Click pada Form1 dan hapus semua code yang ada (CTRL + A) dan Delete atau Backspace
-    Masukan Syntax/Code dibawah ini :


Option Explicit Private Sub Form_Load() Label1.AutoSize = True Label1.Caption = "A. Noerhasan" ' Sesuaikan Captionnya dengan yang dibawah Timer1.Interval = 500 ' Kecepatan bergerak.. (semakin kecil = semakin cepat) Timer1.Enabled = True End Sub Private Sub Timer1_Timer() If Me.Label1.Caption = "A. Noerhasan" Then ' Sesuaikan Captionnya dengan yang diatas Me.Label1.Caption = " " ElseIf Me.Label1.Caption = " " Then Me.Label1.Caption = "A. Noerhasan" End If End Sub

-    Coba jalankan Projectnya atau tekan [F5] dan lihat hasilnya :)
-    Kalian bisa rubah Caption Labelnya sesuka kalian "A. Noerhasan"
-    Silahkan kalian kembangkan kembali Syntax dan Codenya  bila anda butuh referensi silahkan ambil artikel yang ada di Blog ini.. :)

Catatan :
-    Text yang diawali dengan tanda kutip (berwarna hijau) hanyalah komentar saya untuk penjelasan didalam Syntax/Code, anda bisa hapus komentar nya.
-    Syntax/Code Label1.Caption = "A. Noerhasan"  yg ada di Form_Load harus sama dengan Me.Label1.Caption = "A. Noerhasan" yang ada di Timer1_Timer, anda cukup merubah Caption "A. Noerhasan"-nya saja.
-    Syntax/Code Timer1.Interval = 500 berfungsi untuk mengeksekusi kecepatan berkedip Caption Label1. Semakin kecil intervalnya maka semakin cepat Caption Berkedip ;)

Selamat belajar dan semoga sukses :) jangan lupa untuk terus tongkrongin blog ane di http://www.si-abe.com dan http://www.g-tritus.blogspot.com hhe.. :) dan like juga Fanspage Blog kami :)
Terimakasih atas kunjungan anda.
wasallamualaikum wr. wb.