ReleaseCaptureSendMessage Me.hwnd, 161, 2, 0&Form2.Move Me.Left, Me.Top + 4000我的做法是在无标题栏的窗体的最上面放一个无内容的label,然后把代码放在label的mouse_down里面,但应该也不是实时的,具体你可以再研究一下可以用如下的方法,我试过效果一般,有残影http://blog.programfan.com/article.asp?id=16873