VB.Net: test multiple values for equality?

Question

How do you test multiple values for equality in one line? Basically I want to do

if (val1 == val2 == val3 == ... valN)

but in VB.Net.

Answer 1

If val1 = valN AndAlso val2 = valN AndAlso ... Then
End If

This can get cumbersome when testing more than a few values.

Answer 2

There is no way to chain them together like that. You need to break it up into pair'd comparisions linked by AndAlso

if val1 = val2 AndAlso val2 = val3 AndAlso val1 = val3 Then