如何让image控件在移动的过程中不闪烁，平滑的移动？

[howdo123]

我使用的是Image1.MOVE 的命令使它移动，但是闪烁严重？如何让它平滑的移动。因为闪烁的很不令人舒服。谢谢

[AprilSong]

要不闪烁就用画的
不要用.Move

比如这个会闪：
Private Sub Timer2_Timer()
With Image1
.Move .Left + 1, .Top + 1
End With
End Sub


这样就不会～
Private Sub Timer2_Timer()
With Image1
.Visible = False
.Move .Left + 1, .Top + 1

.Parent.AutoRedraw = True
.Parent.Cls
.Parent.PaintPicture .Picture, .Left + 1, .Top + 1
End With
End Sub

[howdo123]

to AprilSong(X)

谢谢！但是还是闪烁。

[AprilSong]

最好的消除闪烁的办法就是双缓冲

http://search.csdn.net/search.asp?key=%CB%AB%BB%BA%B3%E5&class=VB&size=10&option=advance&x=60&y=11