you can get checked items, but you still need to loop through the collection,
For x = 0 To Listbox1.Items.Count - 1
If Listbox1.GetItemChecked(x) Then
'you can retrieve the ID (or Value) from the Dataset/DataTable
'(using the X as the Row in the Dataset/DataTable)
End If
Next