รบกวนพี่ๆช่วยแนะนำการเอาข้อมูลจาก Check box แล้วไปเก็บไว้ใน database หน่อยครับ vb 2008/ms access 2007

Dim i As Integer = 0
Dim allid As String ' ตัวแปรเก็บค่า ID

For i = 0 To Dg_bookrn.Rows.Count - 1

    If CBool(Dg_bookrn.Rows(i).Cells(0).FormattedValue) Then ' เช็คว่าแถวไหนที่เลือก checkbox ให้ทำต่อไปนี้

        allid = CStr(Dg_bookrn.Rows(i).Cells(3).Value.ToString)   ' ตัวแปรเก็บค่า ID โดยเก็บจากเซลที่ 3 ของ ดาต้ากริด

       ' เขียนคำสั่ง insert ลงฐานข้อมูล ระบุ where เปน allid

    End If
Next