vb.net Datagrid到另一个datagrid的值

Posted 2021-04-28

您好，我在使用vb.net将datagrid值传递给另一个datagrid时遇到问题。因为大多数youtube上的教程都将datagrid中的行的值固定为固定值。 2单击按钮时。非常感谢

表单加载上的代码如下：

    Me.DataGridView1.columns.Add("1","1")

Me.DataGridView1.columns.Add("2","1")
Me.DataGridView1.columns.Add("3","3")
Me.DataGridView2.columns.Add("1","1")
Me.DataGridView2.columns.Add("2","1")

并且在传递值的按钮上：

dim dr as  new System.Windows.Forms.datagridviewrow 
for each dr In me.datagridview1.selectedRows
  Me.DatagridView2.rows.Add(dr.cells(0).value,dr.cells(1).value,dr.cells(2).value....and so on)

答案

    Dim sourceGrid As DataGridView = Me.DataGridView1
    Dim targetGrid As DataGridView = Me.DataGridView2
    Dim targetRows = New List(Of DataGridViewRow)
    For Each sourceRow As DataGridViewRow In sourceGrid.Rows
        If (Not sourceRow.IsNewRow) Then
            Dim targetRow = CType(sourceRow.Clone(), DataGridViewRow)
            For Each cell As DataGridViewCell In sourceRow.Cells
                targetRow.Cells(cell.ColumnIndex).Value = cell.Value
            Next
            targetRows.Add(targetRow)
        End If
    Next
    targetGrid.Columns.Clear()
    For Each column As DataGridViewColumn In sourceGrid.Columns
        targetGrid.Columns.Add(CType(column.Clone(), DataGridViewColumn))
    Next
    targetGrid.Rows.AddRange(targetRows.ToArray())