第一个.
向上：控件.top = 控件.top - 1
向右：控件.left = 控件.left +1
向下和向左你自己写
第二个.
我写一个控件的
''''''恢复位置
控件.left＝0
控件.top=0
''''''恢复大小
控件.height=100
控件.width=200
顺遍问一句，你不是要做游戏吧
如果是，这条路你就不要走了
很黑的
学DIRECTX SDK＋VB编程也好
本人来自
http://bbs.eice.com.cn/index.asp?boardid=14
联系站长：helloshuihan@gmail.com