Master Mind bzw. Probelm :) Verfasst am: 12.06.2009, 18:57
hi ich habe folges problem ich habe mal in letzer zeit vor gehabt mich mehr um die spiele programmierung zu kümmen nun ich habe nun dieses problem
Code:
Dim i, y As Integer
Dim ergebnisen(15) As String
For i = 0 To 3
For y = b To 15
If aufgabe(i) = feld(y).BackColor Then
Randomize -Timer
ergebnisen(y) = Int(4 * Rnd) + 1
ergebnisen(y) = ergebnisen(y) - 1
ergebnis(ergebnisen(y)).BackColor = &H80FF&
If ergebnis(y).BackColor = &H80FF& Then
ergebnis(y).BackColor = &H0&
End If
End If
Next y
Next i
b = b + 4
aktion(c).Enabled = False
c = c + 1
aktion(c).Enabled = True
Der code dürch geht das feld von 0 bis 15 in der aufgabe sind 3 farben die aufgabe dürch geht er 3 mal ob im feld von 0 bis 15 die farbe die augewählt wurden ist ,ist sie dieses setz er zufällig organg in das ergebnis feld ist die farbe genau dem platz wo sie sein soll setz er im ergebnis feld schwarz . Hat er dieses getan setzt er B auf 4 somit die schleife von 4 zu 15 . Daher geht er dan das feld von 4 zu 15 dürch
Warum nicht ?
leider erkennt dieses nicht das beim ergebnis ich habe keine ahnung warum
Registrieren
Login
