Чем пользоваться лучше для организации имитации движения ? - VB

Формулировка задачи:

В Microsoft Winndows Common Conntrols имеется ImageList, позволяющий грузить в него картинки. Так же грузить картинки можно в файл ресурсов. Скажите, чем пользоваться лучше для организации имитации движения

Решение задачи: «Чем пользоваться лучше для организации имитации движения ?»

textual
                            Листинг программы 
                        

                            Private Sub Часы1_Timer()
  PutPicture
End Sub
Public Sub PutPicture()
  If FrameCounterA = 5 Then
    qA = -1
  End If
  If FrameCounterA = 1 Then
    qA = 1
  End If
  FrameCounterA = FrameCounterA + qA
  ZA = PA * 5 + FrameCounterA
  'загружаем изображение
  'ZA задаёт цвет шарика
  picA.Picture = ImageList1.ListImages(ZA).Picture
End Sub
                        