वीबीएनईटी भविष्यवाणी ऐरे

Question

मैं निम्नलिखित को Vray.NET predicate में Array का उपयोग करके कैसे परिवर्तित करूं? ढूँढें?

Private Function FindCulture(ByVal Code As String) As Globalization.CultureInfo 
    ' 
    Dim AllCultures As Globalization.CultureInfo() = Globalization.CultureInfo.GetCultures(Globalization.CultureTypes.AllCultures) 
    ' 
    For Each Culture As Globalization.CultureInfo In AllCultures 
     If Culture.TwoLetterISOLanguageName = Code Then 
      Return Culture 
     End If 
    Next 
    ' 
    Return Nothing 
    ' 
End Function 

Answer 1

Private Function FindCulture(ByVal Code As String) As Globalization.CultureInfo 
    Dim AllCultures As Globalization.CultureInfo() = Globalization.CultureInfo.GetCultures(Globalization.CultureTypes.AllCultures) 
    Return Array.Find(AllCultures, Function(s) s.TwoLetterISOLanguageName = Code) 
End Function