关于图片移动的菜鸟问题

Question

怎样让图片向右下移动？谢谢！

Answer 1

Picture1.Move Picture1.Left, Picture1.Top + 100
也可以指定Picture1.Top实现，不过速度要慢一些

Answer 2

Left不是向左吗?
如果要图片从100.100移动到5000,5000
具体要怎么写代码?

Answer 3

picture1.Move  5000 , 5000

Answer 4

dim i as integer
for i=1 to 100
    Picture1.left=Picture1.left+50
    picture1.top=Picture1.top+50
next i
这样图片成45度角移动，但是如果图片较大，可能刷新不好
改变50和100可以控制移动速度，可以设为变量，改变速度时对其赋值

Answer 5

用API函数Bitblt也可以方便的实现。