Cara Membuat Tulisan berjalan(marquee) Di Visual basi 6.0(vb)

untuk membuat tulisan berjalan di vb 6 siapkan 1 label dan timer
nih codingan nya


Private Sub Timer1_Timer()
Label1.Left = Label1.Left - 15
If Label1.Left <= -Label1.Left Then
Label1.Left = Form1.Width
End If
End Sub

Catatan : Di Timer interval nya di isi ,jangan 0
kalo kanan dan ke bawah gk tau kenapa gk bisa , tapi kalo mau ke atas yang left ganti top
terus 15 nya bisa di ganti