VB.NET tienen una funcionalidad similar a "IN" de TSQL?

Question

En TSQL ..

IF MyVal IN (1, 2, 3, 4, 14) BEGIN ... END 

¿Hay una manera de hacer esto en VB.NET?

¿Es posible verificar la existencia de un entero en un conjunto de números enteros en línea?

Tales como:

If MyVal in (1, 2, 3, 4, 14) Then ... End If 

Answer 1

matrices son una implementación de IEnumerable por lo que con la importación System.Linq una versión abreviada de Tim Schmelter de answer sería:

{1,2,3,4,14}.Contains(MyVal) 

matrices también tienen un explicit implementation de IList.Contains, así que sin LINQ una alternativa quizás menos elegante es:

DirectCast({1,2,3,4,14}, IList).Contains(MyVal) 

Answer 2

Por ejemplo List.Contains Método

Dim MyVal = 4 
Dim MyValues = {1,2,3,4,5,6,7}.ToList 

MyValues.Contains(MyVal) 

O BinarySearch:

MyValues.Sort() 
Dim contains = MyValues.BinarySearch(MyVal) > -1 

O Any

MyValues.Any(Function(item)item=MyVal)