|
coba bantu nih...,
Letakkan Syntax ini pada Timer
:
Private Sub Timer1_Timer()
Label1.Left = Label1.Left - 50 If Label1.Left <= -5000 Then Label1.Left = Me.Width End If End Sub Object yang digunakan :
a. Label
b. Timer (untuk ini nilai interval =
1)
NB:
Semua Metode
Left diganti dengan Top, maka jalannya akan
Vertikal.
contoh :
Label1.Top = Label1.Top - 50
Regards,
|
