01.
Private
Sub
Button2_Click(
ByVal
sender
As
System.
Object
,
ByVal
e
As
System.EventArgs)
Handles
Button2.Click
02.
03.
04.
Dim
selectedRows
As
List(Of DataGridViewRow) = (From row
In
DataGridView1.Rows.Cast(Of DataGridViewRow)()
05.
Where Convert.ToBoolean(row.Cells(
"checkBoxColumn"
).Value) =
True
).ToList()
06.
For
i
As
Integer
= 0
To
DataGridView1.Rows.Count - 2
07.
If
DataGridView1.Rows(i).Cells(0).Value IsNot
Nothing
Then
08.
New_User.ListBox1.Items.Add(
Me
.DataGridView1.Rows(i).Cells(0).Value.ToString)
09.
10.
End
If
11.
Next
12.
13.
Me
.Close()
14.
15.
16.
End
Sub