il codice completo è questo:
codice:
Dim myDB As EF_DB = creaMyDB()
Try
Dim lstToDel As List(Of movimenti) = myDB.movimenti.Where(Function(m) idToDel.Contains(m.id_Mov)).ToList
myDB.movimenti.RemoveRange(lstToDel)
myDB.SaveChanges()
MsgBox("Movimenti Eliminati", MsgBoxStyle.Information, "Operazione Effettuata")
out = True
Catch ex As Exception
errMsg(ex)
Finally
killMyDB(myDB)
End Try
le 2 sub che richiamo (creaMyDB e killMyDB) sono queste:
codice:
Function creaMyDB() As EF_DB
Return New EF_DB
End Function
Function killMyDB(ByVal myDB As EF_DB) As Boolean
myDB.Dispose()
Return IsNothing(myDB)
End Function