VB 怎么实现两个窗体接触时粘在一块儿,当拖动主窗体时,会一起移动???

添加一个Timer控件，在Timer1_Timer中键入

Form2.Top = Form1.Top + Form1.Height
Form2.Left = Form1.Left

再将Timer1的Interval设置为56（Timer的最小计量值）就行了。

第二个窗体的位置属性TOP,LEFT，参照第一窗体位置属性TOP,LEFT（注意窗体本身高度、宽度）；然后使用TIME循环检查调用。