0

我必须Datagridview在运行时 1 将控件添加到面板上另一个下方。我怎样才能做到这一点,以便能够在另一个下方添加控件位置 1,以及如何处理单击事件、绘制事件等。对于所有数据网格视图。

4

1 回答 1

1

只需执行以下操作:

Dim lastCtrl As Control
Panel1.Add(AllDataGrids(0))

For i As Integer = 1 to AllDataGrids.Count - 1
    Dim dgv As DataGridView = AllDataGrids(i)

    lastCtrl = Panel1.Controls(Panel1.Controls.Count - 1)
    Panel1.Add(dgv)

    dgv.Top = lastCtrl.Top + LastCtrl.Height + 5
Next

想法是在最后一个控件之后添加每个控件,因此在循环中您以所需的方式获取最后一个控件,然后在底部添加新控件。为了获得事件,您必须DataGridView在循环内手动添加它们:

AddHandler dgv.CellClick, AddressOf CellClickMethod
于 2013-02-18T10:53:43.280 回答