VB.NET 포지티브 배열

Question

찾기 다음을 어떻게 Array.Find를 사용하는 VB.NET 조건 자로 변환합니까?

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