Hallo ich bins nochmal
Gibt es eine schlanke Methode eine Große If-Anweisung zu verkleinern? Habe evtl überlegt mit Select Case aber wirklich kleiner werde ich damit auch nicht...
Geht wieder mal um meine kleine Slotmaschine xD
Hier mal der Ausschnitt:
Spoiler anzeigen
Das soll praktisch die Gewinnermittlung sein wobei die Zahl die Frucht ist und 0 gleicht dem Stern als "Bonus"-Feld
Gibt es eine schlanke Methode eine Große If-Anweisung zu verkleinern? Habe evtl überlegt mit Select Case aber wirklich kleiner werde ich damit auch nicht...
Geht wieder mal um meine kleine Slotmaschine xD
Hier mal der Ausschnitt:
VB.NET-Quellcode
- If (Feld1 = 7 AndAlso Feld2 = 7 AndAlso Feld3 = 7) OrElse
- (Feld1 = 0 AndAlso Feld2 = 7 AndAlso Feld3 = 7) OrElse
- (Feld1 = 7 AndAlso Feld2 = 0 AndAlso Feld3 = 7) OrElse
- (Feld1 = 7 AndAlso Feld2 = 7 AndAlso Feld3 = 0) OrElse
- (Feld1 = 0 AndAlso Feld2 = 7 AndAlso Feld3 = 0) OrElse
- (Feld1 = 0 AndAlso Feld2 = 0 AndAlso Feld3 = 7) OrElse
- (Feld1 = 7 AndAlso Feld2 = 0 AndAlso Feld3 = 0) Then
- 'Ausführender Code
- 'Erdbeere
- ElseIf (Feld1 = 8 AndAlso Feld2 = 8 AndAlso Feld3 = 8) OrElse
- (Feld1 = 0 AndAlso Feld2 = 8 AndAlso Feld3 = 8) OrElse
- (Feld1 = 8 AndAlso Feld2 = 0 AndAlso Feld3 = 8) OrElse
- (Feld1 = 8 AndAlso Feld2 = 8 AndAlso Feld3 = 0) OrElse
- (Feld1 = 0 AndAlso Feld2 = 8 AndAlso Feld3 = 0) OrElse
- (Feld1 = 0 AndAlso Feld2 = 0 AndAlso Feld3 = 8) OrElse
- (Feld1 = 8 AndAlso Feld2 = 0 AndAlso Feld3 = 0) Then
- 'Ausführender Code
- End If
Das soll praktisch die Gewinnermittlung sein wobei die Zahl die Frucht ist und 0 gleicht dem Stern als "Bonus"-Feld