problema con listbox

[jc_moty]

Mi problema es cuando quiero guardar lo que seleccionan.

A ver, porque no probas asi:

Código:

sql = "SELECT * FROM [Acuerdo_Deudas_Item]"
Rs.Open sql, cnn, adOpenDynamic, adLockOptimistic
For c = 0 To lista_item.ListCount
	If lista_item.Selected(c) = True Then
		Rs.AddNew
		Rs.Fields("Item") = lista_item.Columns(1,c)
		Rs.Update
	End If
Next c

Saludos