Dim dp As new Point()dp.X = Windows.Forms.Cursor.Position.Xdp.Y = Windows.Forms.Cursor.Position.Y
dp = e.Form.BaseForm.PointToClient(dp)msgbox(dp.x & " " & dp.y)