[0theghost0]

السلام عليكم

اريد جعل الكود مستمر بتحريك النص من الأسفل الى الأعلى

كود :

Label1.Location = New Point(Label1.Location.X, Label1.Location.Y - 1)
       If Label1.Location.Y < -Label1.Width Then
           Label1.Location = New Point(Me.Width, Label1.Location.Y)
       End If
       Me.Refresh()

هذا الكود عندما يذهب النص الى الاعلى لايظهر مجددا فما الحل شباب وخبراء