Membuat Animasi Teks

Wah,, kalo soal animasi pasti banyak yang tertarik sama hal yang satu ini.

Nah masalahnya sekarang adalah, kita akan membuat animasi sederhana dari VB 6.0 .
Animasi teks ini akan terlihat sama kayak marquee pada tag HTML. Kalo yang udah tau HTML dan tag - tag nya, pasti bisa ngebayangin Animasi teks ini jadi nya bakalan kayak gimana...

Yang perlu dimiliki adalah:
1. Seperangkat komputer standard (kalo lengkap malah bagus)..
2. Visual Basic 6.0 (edisi apapun), karena kita akan membatnya dalam VB 6.0
3. Kesabaran, karena programmer memang sangat butuh kesabaran supaya programnya bagus..

Okeh,, langkah pertama adalah
Buka VB 6.0 kalian..

Setelah itu buat form dengan model seperti ini:



cuma naro satu timer doank kan, timer itu bisa di ambil dari sini:



fungsi timer adanya di toolbox..

setelah itu doubleclick fungsi timer yang ada pada form, dan akan muncul jendela coding...

lalu masukkan coding berikut:


Private Sub Timer1_Timer()
If Form1.Caption = "VISUAL BASIC" Then
Form1.Caption = "ISUAL BASIC"
Else
If Form1.Caption = "ISUAL BASIC" Then
Form1.Caption = "SUAL BASIC"
Else
If Form1.Caption = "SUAL BASIC" Then
Form1.Caption = "UAL BASIC"
Else
If Form1.Caption = "UAL BASIC" Then
Form1.Caption = "AL BASIC"
Else
If Form1.Caption = "AL BASIC" Then
Form1.Caption = "L BASIC"
Else
If Form1.Caption = "L BASIC" Then
Form1.Caption = "BASIC"
Else
If Form1.Caption = "BASIC" Then
Form1.Caption = "ASIC"
Else
If Form1.Caption = "ASIC" Then
Form1.Caption = "SIC"
Else
If Form1.Caption = "SIC" Then
Form1.Caption = "IC"
Else
If Form1.Caption = "IC" Then
Form1.Caption = "C"
Else
If Form1.Caption = "C" Then
Form1.Caption = " "
Else
Form1.Caption = "VISUAL BASIC"
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End Sub


lalu click dua kali juga pada form nya, dan akan muncul juga coding window,, lalu copas coding berikut:

Private Sub Form_Load()
Timer1.Interval = 500
Form1.Caption = "VISUAL BASIC"
Form1.Height = 0
End Sub

Selanjutnya adalah pengaturan properties,,
ini loh yang namanya kolom properties:



tuh yang jendela sebelah kanan, namanya properties window...
yang dirubah properties nya kali ini adalah fungsi Timer1.

dan yang dirubah adalah:
enabled : true

kalo sudah true dari sana nya, brarti gag usah diganti lagi.
Jalankan program dengan menekan tombol keyboard F5,,

Yang perlu di ingat bahwa fungsi timer tidak akan muncul pada form apabila di jalankan / run (F5)... Fungsi Timer hanya sebagai penggerak saja...

kalo kalian mau download file.vbp nya, silahkan download Di Sini

Kalo ada yang merasa kesulitan, boleh kasih komennya dibawah kok...

Selamat mencoba...