Sobald ich nach Überprüfung von Breite und Höhe eines Bildes dies mit der Kill() - Anweisung löschen will kommt immer eine Zugriffsverletzung und es erscheint eine Meldung, dass bereits ein anderer Prozess auf das Bild zugreift, obwohl nichts anderes auf das Bild zugreift. Folgend ein Quelltextauszug der Bedingung:
Anzahl = FileListBox1.Items.Count 'Anzahl Listenelemente
For i = 0 To Anzahl - 1
If Image.FromFile(Quellpfad & "\" & FileListBox1.FileName).Width < 800 _
And Image.FromFile(Quellpfad & "\" & FileListBox1.FileName).Height < 600 Then
On Error GoTo Handler
Kill(Quellpfad & "\" & FileListBox1.FileName) 'Wenn Bedingung "wahr"
Exit Sub
Handler:
If Err.Number = 55 Then
MsgBox("Zugriff auf Datei " & FileListBox1.FileName & " verweigert!")
Resume Next
End If
End If