主题：[求助]无边框窗体实现基本操作可否扩展

 任意一个控件，然后编写mousemove事件

If e.Button = MouseButtons.Left Then
    basemainform.left += e.x
    basemainform.Top += e.y
End If

 楼主，终于知道你的意图了。

 你是想用共有窗口模拟菜单，这样不错，就是不能固定它的位置比较不爽。