vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Suche Visual-Basic Code
Mastermind Auswertung 
Autor: VBNoob
Datum: 07.04.03 10:48
Hi all,

Weiss jemand wie ich in einem Mastermind die Anzahl der Farben die zwar richtig, aber am falschen Platz sind zählen kann. Bisher habe ich es folgendermassen versucht:
        If Lösung(i).BackColor = Pic1(i).BackColor Then
            richtigerplatz = richtigerplatz + 1
        ElseIf (Lösung(i).BackColor <> Pic1(i).BackColor) And ((Lösung( _
          i).BackColor = Pic1(0).BackColor) Or (Lösung(i).BackColor = Pic1( _
          1).BackColor) Or (Lösung(i).BackColor = Pic1(2).BackColor) Or (Lösung( _
          i).BackColor = Pic1(3).BackColor)) Then
            falscherplatz = falscherplatz + 1
        End If
richtigerplatz zählt die Anzahl Farben die am richtigen Platz sind, falscherplatz die Anzahl derer, die zwar richtig, aber am falschen Platz sind. Das Problem dabei ist folgendes: Wenn in der Lösung, die Zufallsgeneriert ist, zwei oder mehr gleiche Farben sind, wird für jede falscherplatz um eins erhöht. Bsp:
Lösung: Rot-Rot-Blau-Grün
Eingabe: Weiss-Weiss-Rot-Gelb
Auswertung: Zwei Farben Richtig aber am falschen Platz

Gruss VBNoob
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Mastermind Auswertung1.427VBNoob07.04.03 10:48
Re: Mastermind Auswertung265Zardoz12.04.03 23:47

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel