VS 2019 [RESOLVED] from CheckedListbox to Parameters.AddWithValue

Hi want to update a record in an access table with the values of a CheckedListbox

I use this code to update the record but don't know how to loop through the CheckedListbox and get the values of the items so I can update the record.


CheckedListBox1.Items.Add("11X", row.Item("send_11"))
CheckedListBox1.Items.Add("43X", row.Item("send_43"))
CheckedListBox1.Items.Add("13X", row.Item("send_13"))...etc


Private Sub BtnSave_Click(sender As Object, e As EventArgs) Handles BtnSave.Click
'the record has to be stored in the database
Dim Command As OleDbCommand
Dim SQLstr As String

SQLstr = "UPDATE Vergelijk SET [Vergelijk Name] = @name, regexp = @regx, [Document Name] = @doc_name, send_11XSTAF = @11 WHERE OldName = @oldname"
Command = New OleDbCommand(SQLstr, con)
With Command
.CommandText = SQLstr
.Parameters.AddWithValue("@name", DbNullOrStringValue(DocName.Text))
.Parameters.AddWithValue("@regx", DbNullOrStringValue(RegeXp.Text))
.Parameters.AddWithValue("@11", ????)
.Parameters.AddWithValue("@oldname", DbNullOrStringValue(DocName.Text))
.Connection = con
.ExecuteNonQuery()
End With

End Sub