VB中没有Right属性,可以使用move方法移动控件位置
for i = i to form1.width step 100 i= i+ form1.leftnext i就会向右走的了。
用一个timer控件，设置一个时间。向左移就是a.width+(每段时间移动的位置)，向右则相反！
