I am using followoing code
Dim dtcCheck As New DataColumn("Check")
Dim ds As New DataSet
ds = New DataSet("NRI")
' Dim connstring As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\Projects\NEWSLETTERS\NEWSLETTERS\DB\NRI. mdb"
Dim lobjconn As OleDbConnection = New OleDbConnection(connString)
Dim comm As OleDb.OleDbCommand = New OleDb.OleDbCommand("SELECT NAME,EMAIL from NRI")
' check_box()
comm.CommandType = CommandType.Text
lobjconn.Open()
comm.Connection = lobjconn
Dim lda As OleDbDataAdapter = New OleDbDataAdapter
lda.SelectCommand = comm
lda.TableMappings.Add("NRI", "Table")
lda.Fill(ds)


dgrdMaillist.SetDataBinding(ds, "Table")
Record_Count = ds.Tables("Table").Rows.Count
Txt_member.Text = Record_Count

dtcCheck.DataType = System.Type.GetType("System.Boolean")
dtcCheck.DefaultValue = False
ds.Tables("Table").Columns.Add(dtcCheck)
now I am wanted to select all column from field check