Hallo wieder,
ich bin wieder Fernando.
Ich habe meine Aufgabe teilweise gelöst.
Aber beim Aufruf kriege ich noch einen Fehler.
Diese Teillösung findet unter dem CommandButton „Schwarze Flächen #“ statt.
Sie beginnt ab der Linie:
Dim Bild(1 To 9, 1 To 9) As Byte
Bis:
End If
Next x
Next y
Vielleicht kann jemand diesen Fehler korrigieren.
Bitte wenn jemand es kann, bin ich sehr dankbar dafür, weil ich diese Aufgabe so schnell wie möglich beenden muss.
Im Anhang unter der folgenden Internet Seite sind als .zip Datei mein bis jetzt erledigtes Programm (auch die Teillösung) und das Bild zum Bearbeiten.
(neue Aufgabe.zip)
http://rapidshare.com/files/5143688/neue_Aufgabe.rar.html
Für weitere Erklärungen und Fragen stehe ich gerne zur Verfügung.
Gruß
Fernando
