อยากทราบการเพิ่มข้อมูลจากทั้ง textbox และ Datagridview ลง MySQL พร้อมกัน รบกวนผู้รู้แนะนำด้วยครับ

Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
        StrSQL = "INSERT INTO rent(Book_ID,Barcode_ID,Book_NameTH,Book_NameEN,dateStart,dateEnd,Mem_ID,Mem_FName,Mem_LName,Mem_Phone) VALUES (@Book_ID,@Barcode_ID,@Book_NameTH,@Book_NameEN,@dateStart,@dateEnd,@Mem_ID,@Mem_FName,@Mem_LName,@Mem_Phone)"
        For i As Integer = 0 To Rent.DataGridView1.RowCount - 1
            If Not Rent.DataGridView1.Rows(i).IsNewRow Then
                objCmd = New MySql.Data.MySqlClient.MySqlCommand(StrSQL, MySQLConn)
                With objCmd
                    .Parameters.Add(New MySqlParameter("@Book_ID", Rent.DataGridView1.Rows(i).Cells(0).Value))
                    .Parameters.Add(New MySqlParameter("@Barcode_ID", Rent.DataGridView1.Rows(i).Cells(1).Value))
                    .Parameters.Add(New MySqlParameter("@Book_NameTH", Rent.DataGridView1.Rows(i).Cells(2).Value))
                    .Parameters.Add(New MySqlParameter("@Book_NameEN", Rent.DataGridView1.Rows(i).Cells(3).Value))
                    .Parameters.Add(New MySqlParameter("@dateStart", Rent.DataGridView1.Rows(i).Cells(7).Value))
                    .Parameters.Add(New MySqlParameter("@dateEnd", Rent.DataGridView1.Rows(i).Cells(8).Value))
                    .Parameters.Add(New MySqlParameter("@Mem_ID", Rent.txtMemID.Text))
                    .Parameters.Add(New MySqlParameter("@Mem_FName", Rent.txtName.Text))
                    .Parameters.Add(New MySqlParameter("@Mem_LName", Rent.txtLName.Text))
                    .Parameters.Add(New MySqlParameter("@Mem_Phone", Rent.txtPhoneNumber.Text))
                End With
                objCmd.ExecuteNonQuery()
                objCmd.Parameters.clear()
            End If
        Next
        MessageBox.Show("บันทึกข้อมูลแล้ว", "บันทึกข้อมูล", MessageBoxButtons.OK, MessageBoxIcon.Information)
        MySQLConn.Close()
        Rent.DataGridView1.Rows.Clear()
    End Sub