क्या वीबी.नेट में टीएसक्यूएल के "आईएन" की तरह कार्यक्षमता है?

Question

TSQL में ..

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

वहाँ VB.NET में ऐसा करने का कोई तरीका है?

क्या पूर्णांक इनलाइन के एक सेट में पूर्णांक के अस्तित्व की जांच करना संभव है?

जैसे:

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

Answer 1

सरणी IEnumerable के एक कार्यान्वयन कर रहे हैं तो System.Linq आयात के साथ टिम Schmelter के answer की एक आशुलिपि संस्करण होगा:

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

सरणी भी एक IList.Contains की explicit implementation है तो LINQ के बिना एक शायद कम सुरुचिपूर्ण विकल्प है:

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

Answer 2

उदाहरण List.Contains विधि

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

MyValues.Contains(MyVal) 

या BinarySearch के लिए:

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

या Any

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