一、学友问题描述：

学友提问说：怎样才能移动窗体，我的窗体动不了。

我：鼠标移动到窗体上沿，然后直接拖动即可。

学友又问：哦哦，那能用代码实现吗？

二、解决方法：

      在网上查阅了些资料后发现，DoCmd.RunCommand方法的acCmdDocMove参数可以实现类似效果，在窗体被遮挡等情况下也算有用。现分享给大家。

代码如下：

Private Sub Command0_Click()
    DoCmd.RunCommand acCmdDocMove
End Sub

演示图：