' Cuando el usuario seleccione las materias correspondientes y haga click en un boton
For w = 0 To lstcorrelativas.ListCount - 1
If lstcorrelativas.Selected(w) = True Then
rs.AddNew
rs!mat_correlativa = lstcorrelativas.ItemData(lstcorrelativas.ListIndex) 'Aca creeria que esta mi problema
rs!id_materia = LstMaterias.ItemData(LstMaterias.ListIndex) ' este dato actualizando desde otro list (Me funciona bien)
rs.Update
End If
Next