Membuat Text Berjalan di VB

Seperti Judul'a Membuat Text di vb biar berjalan Seperti Dibawah Ini Contoh Tulisan Berjalan
Cara Membuat Tampilan text berjalan Seperti di Atas buat di Vb ..
pertama dan yang lebih utama harus Harus Buka Vb'a Dulu heheheh
selanjut'a
1. Butlah Lebel dulu Satu Atau dua. terselah Maunya berapa.. heehheh
Disini saya contohkan satu label z
2. Buatlah rumus Kayak gini

Dim Red, Green, Blue As Integer
Private Sub Timer1_Timer()
If Blue <= 255 Then Blue = Blue + 50 Else Blue = 0 Green = Green + 50 End If
If Green >= 255 Then
Green = 0
Red = Red + 50
End If

If Red >= 255 Then
Red = 0
End If
Label1.ForeColor = Int(RGB(Red, Green, Blue))
Label1.Refresh
End Sub


Private Sub Timer2_Timer()
Label2.Left = Label2.Left - 15
If Label2.Left <= -Label2.Left Then /dapat diubah kekanan ganti left keright keatas
top dan kebawah buttom.
Label2.Left = Form1.Width
End If
End Sub


jika sudah di buat coba Run . Insa allah Jalan kalau Ga Jalan Juga Bawa Laptop'a
keluar bawa anda jalan jalan insa allah Jalan heheheh
Smoga Bisa..