Как вставить элементы списка в базу данных MS ACCESS

---

У меня возникла проблема с тем, как вставить перечисленные элементы из списка в базу данных и вернуть их поздно?

Что я уже пробовал:

Это мой код вставки базы данных, как я могу вставить элементы списка?

Try
           connect()
           connection.Open()
           Dim queryString As String
           queryString = "Insert into ServiceRecords([ServiceID],[ClientName],[Contact Person],[Address],[TimeStarted],[TimeEnded],[OpDate],[FloorDrain Quantity],[FloorDrain Clogged],[FloorDrain F/R]) Values(@SeriveID,@ClientName,[@Contact Person],@Address,@TimeStarted,@TimeEnded,@OpDate,[@FloorDrain Quantity],[@FloorDrain Clogged],[@FloorDrain F/R])"
           command = New OleDbCommand(queryString, connection)
           command.Parameters.Add(New OleDbParameter("ServiceID", CType(serviceIDText.Text, String)))
           command.Parameters.Add(New OleDbParameter("ClientName", CType(clientNameText.Text, String)))
           command.Parameters.Add(New OleDbParameter("Contact Person", CType(cPersonText.Text, String)))
           command.Parameters.Add(New OleDbParameter("Address", CType(addressText.Text, String)))
           command.Parameters.Add(New OleDbParameter("TimeStarted", CType(timeStartedText.Text, String)))
           command.Parameters.Add(New OleDbParameter("TimeEnded", CType(timeEndedText.Text, String)))
           command.Parameters.Add(New OleDbParameter("OpDate", CType(datePicker.Text, Date)))
           command.Parameters.Add(New OleDbParameter("FloorDrain Quantity", CType(fldQuantityText.Text, String)))
           command.Parameters.Add(New OleDbParameter("FloorDrain Clogged", CType(fldClcbox.CheckState, Boolean)))
           command.Parameters.Add(New OleDbParameter("FloorDrain F/R", CType(fldFinRecText.Text, String)))

           MsgBox("Successfully Added!", MsgBoxStyle.Information)
           Me.Close()

           command.ExecuteNonQuery()
           displayDataToGrid()
           mainForm.serviceRecordDataGridView.Rows(mainForm.serviceRecordDataGridView.Rows.Count - 1).Selected = True
           connection.Close()


       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try

---