设计小球垂直移动表单
要求：
    (1) 编辑状态图中所见的属性在属性窗口中设置，其他属性和功能必须用程序代码实现；
    (2)小球的初始位置在表单的顶端，表单运行后，每间隔0.1秒，小球自动向下移动1个单位，直到移到表单的最底部；
    (3)然后每隔0.1秒，小球会自动向上移动1个单位，直到小球移到表单最顶端；

传上来看看

楼主是在布置作业，楼上赶快完成吧。

8会哎

楼主先自己做，有不会的地方贴上来讨论。

不会吧，动态改变控件的坐标应该不难啊。

不見人了噎

既然布置了作业没人做，楼主当然就懒得回贴了。

路过

thisform.image1.top=thisform.image1.top+10
if thisform.image1.top>=-thisform.height
   thisform.image1.top=0
endif