在名称为Form1的窗体上建立二个名称分别为Cmd1、Cmd2，

代码很简单： Private Sub Cmd1_Click() Cmd2.Left = Cmd1.Left Cmd2.Top = Cmd1.Top End Sub 记得把按钮控件改名为Cmd1和Cmd2！