主题：窗口跟随窗口，谁有办法？求帮助

窗口计时器里面使用

Dim y As Integer = basemainform.top

Dim x As Integer = basemainform.left

e.Form.SetBounds(x+50, y,250, 35)

以上代码 

有一下问题

1.速度跟不上

在主窗口高速移动的时候，就出现跟不上的情况

2.窗口大小改变时候，窗口会暂停事件

在主窗口改变大小的时候，同样跟不上

求有没有什么好的方法