猎取窗体坐标:TextBox1.Text = Me.PointToClient(Me.MousePosition).XTextBox2.Text = Me.PointToClient(Me.MousePosition).Y猎取控件坐标: TextBox1.Text = Me.Panel1.PointToClient(Me.MousePosition).X TextBox2.Text = Me.Panel1.PointToClient(Me.MousePosition).Y