file.vb
PublicClass Form1
PrivateSub Timer1_Tick(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Timer1.Tick
If Label1.Left > 400 Then
Label1.Left = 10
EndIf
Label1.Left = Label1.Left + 15
EndSub
EndClass
PublicClass Form1
PrivateSub Timer1_Tick(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Timer1.Tick
If Label1.Left > 400 Then
Label1.Left = 10
EndIf
Label1.Left = Label1.Left + 15
EndSub
EndClass