VB.Net เพิ่มข้อมูลลง Database ไม่รอดครับ ช่วยหน่อยนะครับ

                Dim NewRow As DataRow = ds_stock_sale.Tables("tbstock_sale").NewRow
                NewRow(0) = txtMainBarcode.Text
                NewRow(1) = txtbarcode_sale.Text
                NewRow(2) = txtdesc_short.Text
                NewRow(3) = txtunit_sale.Text
                NewRow(4) = txtqty_per_unit.Text
                NewRow(6) = txtcost_vat.Text
                NewRow(5) = NewRow(6) - ((NewRow(6) * 7) / 107)
                NewRow(7) = txtprice_sale.Text

                ds_stock_sale.Tables("tbstock_sale").Rows.Add(NewRow)