2 Cara membuat Text Bergerak pada VB 6.0

Kali ini, saya akan Share cara membuat Judul/Text pada VB dapat bergerak ..

ok, kita langsung aja Ke Tutorialnya ...

1) Sediakan 1 buah Label dan 1 Buah Timer ..

2) Pada Timer, Ubah Intervalnya menjadi 80 .. (sebenarnya bebs, makin sedikit intervalnya, makin cepet jalannya)

3) Kemudian, Klik 2x pada Timer1, masukan Script dibawah :

Label1.Left=Label1.Left - 15

If(Label1.Left <= -(Label1.Width)) Or (Label1.Left >= Me.ScaleWidth
Then Label1.Left = Me.ScaleWidth

Tinggal pencet F5

Sekian dari saya , Selamat Mencoba !!