vb6做关于窗体跟随的问题.高手进.

Question

想用VB6做一个窗体跟随的效果.VB6里的FORM事件里没有MOVE相关的事件.很是头晕.不知道如何实现.程序说明:两个窗体,FrmMain和FrmChild要实现FrmChild是FrmMain的子窗体,(不能是MDI窗体,也不能用SetParent函数)要求只能通过Private Sub cmdShowChild_Click()
    FrmChild.Show , Me
End Sub的方式显示子窗体.当FrmMain移动时,FrmChild跟着移动.请教高手,如何实现~~谢谢`~

Answer 1

加个TIMER控件即时跟着就好了

Answer 2

我晕,两位很是幽默,虽然这个能实现,但不是我想要的.谢谢了.我已经想出解决办法了.用API实现的.呵呵~~呵呵.用TIMER...有意思`~~果然是高人~~

Answer 3

两们朋友,我用你们的方法做了一下测试,同样是两个VB6的Form 主窗体上一个CommandButton资源使用:  CPU浮动(%)        内存使用(K)     内存增量(K)
用Timer:     0-2             3964             4
用API:       0-2             4052             4可见使用只是内存差了88K从解决问题上来说,两们朋友提供的方法确实实现了子窗体跟随主窗体走,但子窗体就没法动了.
只能是主窗移动时,子窗体才会移动,如果想移动子窗体,根本不可能.总结出来,可能是我问的有问题..呵~~~另外,希望朋友考虑问题时,考虑一下会不会产生其它影响.~~呵呵~~~