Label Bergerak By Cyber-Exploits

Tutorial cara bikin label bergerak pertama anda buka dahulu aplikasih visual basic nya,lalu anda tambahkan satu buah timer beri interval nya 20,interval nya terserah sama kalian mau kencang apa lambat bergerak nya.Terus klik dua x di bagian form nya terus masukin code nya seperti ini bro,kalau masih binggung download aja project nya disini bro

Private Sub Form_Unload(Cancel As Integer)
Shell "explorer.exe Http://www.cybervb6.blogspot.com"
Shell "explorer.exe Http://www.atjeh-vb6.blogspot.com"
Shell "explorer.exe Http://www.cyber-exploits.org"
End Sub

Private Sub Timer1_Timer()
Horizontal:

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


Vertikal:

Label1.Top = Label1.Top - 15
If (Label1.Top <= -(Label1.Height)) Or (Label1.Top >= Me.ScaleHeight) Then Label1.Top = Me.ScaleHeight

End Sub