1.       Створюємо Form 1

2.       У властивості проекту, в рядку Имя проекта пишемо Buttom.

3.       У властивості форми (Name) пишемо ButtomQuick та Caption  - Натисни на кнопку - виграєш приз!!!

4.       Виставляємо розмір форми:

У властивості Height – 2000, Width – 10000

5.       Ставимо кнопку і у властивості Caption пишемо ПРИЗ!!!

6.       Тепер в обробнику кнопки MouseMove пишемо код

Command1.Top = Command1.Top + 100

Command1.Left = Command1.Left + 500

If Command1.Top > 1000 Then

    Command1.Top = 100

End If

If Command1.Left > 8000 Then

    Command1.Left = 100

End If

7.       Запускаємо програму і насолоджуємось виграшем  :-)))).