Текст программы:
Timer.Interval = 50
Timer.Tick = tickle
x=10
y=10
Sub tickle
GraphicsWindow.DrawImage("C:\Documents and Settings\Pupil\Мои документы\Мои рисунки\ul1.gif", x,y)
x=x+1
y=y+1
EndSub
Timer.Interval = 50
Timer.Tick = tickle
x=10
y=10
Sub tickle
GraphicsWindow.DrawImage("C:\Documents and Settings\Pupil\Мои документы\Мои рисунки\ul1.gif", x,y)
x=x+1
y=y+1
EndSub
Комментариев нет:
Отправить комментарий