check variable against several constants

[AmbientMike]

Hopefully this will be a really quick one but I can't figure it out...

I have several constants that I want to check the value of a variable against. Is there an easy way to do it in one shot or do I have to compare them all separately?

For example I'd like something like this to work (but obviously it doesn't)...

$var1 = "1"
$var2 = "2"
$var3 = "3"
$var4 = "4"
$var5 = "5"
$var6 = 0
If $var1 <> $var2 to $var5 Then $var6 = 1

rather than have it like...

$var1 = "1"
$var2 = "2"
$var3 = "3"
$var4 = "4"
$var5 = "5"
$var6 = 0
If $var1 <> $var2 Then $var6 = 1
If $var1 <> $var3 Then $var6 = 1
If $var1 <> $var4 Then $var6 = 1
If $var1 <> $var5 Then $var6 = 1

Is there some syntax change that might get this to work. I have a lot of constants to check against so this would be good.

Cheers.

Edited October 19, 2012 by AmbientMike

[water]

You could use an array and do the comparison in a loop

Global $aVars[4] = ["2", "3", "4", "5"]
$var1 = "1"
$var6 = 0
For $i = 0 to UBound($aVars, 1) - 1
    If $aVars[$i] <> $var1 Then $var6 = 1
Next

[Mechaflash]

If $var = any of the values, do nothing, or else $var6 = 1. Same concept just reversing the negatives.

Switch $var1
  Case $var2, $var3, $var4, $var5

  Case else
    $var6 = 1
EndSwitch

OR

If $var1 <> $var2 Or $var1 <> $var3 Or $var1 <> $var4 Or $var1 <> $var 5 Then $var6 = 1

I prefer neither however. Do it water's way =P

EDIT: Changed = to <> derp

Edited October 19, 2012 by Mechaflash

[Tekk]

Another way...

Local $var1 = "1"
Local Const $var2 = "2"
Local Const $var3 = "3"
Local Const $var4 = "4"
Local Const $var5 = "5"
Local $var6 = 0

For $c = 2 To 5
   If $var1 <> Eval('var' & $c) Then $var6 = 1
Next