複制 DataGridView 方法 x 2
Form1.vb 部分 |
Private Sub GetData2() For index As Integer = 0 To DataGridView1.Columns.Count – 1 DataGridView2.Columns.Add(DataGridView1.Columns(index).Name, DataGridView1.Columns(index).HeaderText) Next For index2 As Integer = 0 To DataGridView1.Rows.Count – 1 DataGridView2.Rows.Add() For index3 As Integer = 0 To DataGridView2.Columns.Count – 1 DataGridView2.Rows(index2).Cells(index3).Value = DataGridView1.Rows(index2).Cells(index3).Value Next Next End Sub |
Form1.vb 部分 |
Private Sub GetData2() DataGridView2.DataSource = DataGridView1.DataSource End Sub |