[VB6] Zahlen miteinander vergleichen

[Masterclavat]

Hallo,

ich habe mich mal wieder spaßeshalber an ein Projekt gemacht, bei dem sich mir eine kleine Frage auftut bei der ich eure Hilfe gebrauchen könnte.

Also es geht um folgendes: Ich habe 6 Würfel, deren Augenzahl vorher durch den Zufall ermittelt wird. (1-6)
Diese Würfel möchte ich nun auf Gleichheit prüfen, also ob 3,4,5 oder 6 Würfel die selbe Augenzahl haben.

Ich könnte das zwar in einer hundertfachen If-Abfrage abfragen, jedoch suche ich nach einer einfacheren Methode, als diese. Und genau das ist meine Frage: Gibt es ein "Verfahren" oder etwas Vergleichbares das mir diese Abfrage erleichtern kann?
Wenn ja, und ihr ein Beispiel habt, könnt ihr das gerne Posten.


MfG Masterclavat

 

[Pixel1001]

Hallo,

ich habe zwar keinen Code für dich aber dafür einen Denkansatz.

Würfel in ein Array packen, dann mit Quick- oder Bubblesort sortieren und
dann mit einer Schleife über die Würfel, und Anzahl gleicher Werte zählen.

oder

Falls das Programm eine Datenbankanbindung hat und du auch eine Statistik
haben möchtest oder auch eventuell speichern möchtest, dann ab mit dem Ergebnis in die
DB und per SQL Sum(),Count() und Group By verwenden.

Viel Spass dabei.

Pixel1001