Czy VB.NET ma funkcjonalność podobną do "IN" TSQL?

Question

W TSQL ..

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

Czy istnieje sposób, aby zrobić to w VB.NET?

Czy jest możliwe sprawdzenie istnienia liczby całkowitej w zbiorze liczb całkowitych inline?

Takich jak:

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

Answer 1

Tablice są implementacją IEnumerable więc z importu System.Linq skróconą wersję Tim Schmelter na answer byłoby:

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

Tablice mają również explicit implementation od IList.Contains, więc bez LINQ może mniej elegancka alternatywa:

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

Answer 2

Na przykład List.Contains Method

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

MyValues.Contains(MyVal) 

Albo BinarySearch:

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

Albo Any

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