[VB2010] Mehrere Integer auf Gleichheit prüfen

VblerOdaned schrieb:
> Das kann doch nicht sein.

weil man mit = nicht vergleicht?

versuch es mal mit:

If not (a==b==c==d) then

Habe es jetzt so gelöst:

    Function IsEqual(ByVal Int1 As Integer, ByVal Int2 As Integer, ByVal 
Int3 As Integer, ByVal Int4 As Integer) As Boolean
        If Int1 <> Int2 Then
            Return False
            Exit Function
        End If
        If Int1 <> Int3 Then
            Return False
            Exit Function
        End If
        If Int1 <> Int4 Then
            Return False
            Exit Function
        End If
        If Int2 <> Int3 Then
            Return False
            Exit Function
        End If
        If Int2 <> Int4 Then
            Return False
            Exit Function
        End If
        If Int3 <> Int4 Then
            Return False
            Exit Function
        End If
        Return True
    End Function



Aber das muss doch einfacher gehen !!!

da es vb ist, könnte es auch so gehen

If not (a=b and a = c and a = d) then
  ... 'Nicht gleich

Und wo wird da c mit d vergleichen?

VblerOdaned schrieb:
> Und wo wird da c mit d vergleichen?

wozu?

es wird a mit c und a mit d verglichen.

so geht es auch vermutlich

If (a <> b or a <> c or a <> d) then

VblerOdaned schrieb:
> If not (a=b=c=d) then
>   ... 'Nicht gleich

das dürfte sogar in C falsch sein.

a=b liefert 0 oder 1 zurück
wenn jetzt c dann 0 oder 1 ist, denkst du das sie gleich sind.

Peter II schrieb:
> weil man mit = nicht vergleicht?
>
> versuch es mal mit:
>
> If not (a==b==c==d) then
Wenn man keine Ahnung hat, einfach mal schlau machen oder ruhig sein ;)

https://msdn.microsoft.com/en-us/library/cey92b0t.aspx
https://msdn.microsoft.com/en-us/library/41d8z008.aspx

1

The = Operator (Visual Basic) is also used as an assignment operator.

2

3

...

4

5

The = operator is also used as a comparison operator. For details,

6

see Comparison Operators (Visual Basic).

Kaj schrieb:
> Wenn man keine Ahnung hat, einfach mal schlau machen oder ruhig sein ;)

aus dem Grund stand ein Fragezeichen da!

Aber selbst dann würde es nicht funktioniere, weil der vergleich Unsinn 
ist.

a = 3
b = 2
c = 0

if ( a = b = c ) ...

-> ( (3 = 2) = 0 ) ...
-> ( ( 0 ) = 0 )
-> true

blöd.

Falls mal die == Taste nicht funktioniert ;-)

1

//return -1 if equal

2

int vergleich(int a, int b, int c, int d)

3

{

4

    return (a & b & c & d) | (~a & ~b & ~c & ~d);

5

}