设置与控制相关的新表格的位置

Question

我坚持使用基本的。

在这里，我需要将新表单“myForm2”放在DataGridView的“myDgv”位置。
这是我的方法：

Dim fl As New myForm2

fl.StartPosition = FormStartPosition.Manual
Dim p As Point = Me.PointToScreen(myDgv.Location)
fl.Location = p
fl.Show(Me)

显示的代码将myForm2置于屏幕的左上角位置 如何让它将myForm2放在myDgv的左上角？

Answer 1

首先，获取网格的屏幕坐标：

Dim pt As Point = myDgv.PointToScreen(Point.Empty)

然后设置表单的位置：

fl.Location = pt