Dim chkColumn As New DataGridViewCheckBoxColumn()
chkColumn.Name = "check"
chkColumn.Width = 50
chkColumn.DataPropertyName = "check"
chkColumn.HeaderText = "check"
chkColumn.DisplayIndex = 0
lstData.Columns.Add(chkColumn)
SQL = "SELECT * FROM customer;"
Call readsq(SQL)
lstData.DataSource = tmTable
Dim chk As Boolean = False
For i As Integer = 0 To lstData.RowCount - 1
chk = lstData.Rows(i).Cells("check").Value
If (chk = True) Then
IDX = lstData.Rows(i).Cells("customer_ID").Value
End If '
Next