Private Sub Timer1_Elapsed(ByVal sender As System.Object, ByVal e As _
      System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed
        Dim X As Integer
        X = 0
        X = X + 1
 
        Panel1.Location = New System.Drawing.Point(X, 25)
    End Sub