番号のリストの出現数

Question

私は数字の1の出現の数を数えなければならないvb.netで解決する小さな問題があります1762728381128911私はこの解決策を行いましたが、私は確かにもっと洗練された方法があると確信していますこの 。あなたは「より洗練された」したいと思い、このコードのどの部分を指定していませんが、NBの時に名前拡張メソッドをピックアップして、コレクションasEnumerable()をしなければならない

値を返すためのLINQを使用することができます

Public Function CheckOccurance() As Integer 
    Dim numbersList As New List(Of String) 
    numbersList.Add("1") 
    numbersList.Add("7") 
    numbersList.Add("6") 
    numbersList.Add("2") 
    numbersList.Add("7") 
    numbersList.Add("2") 
    numbersList.Add("8") 
    numbersList.Add("3") 
    numbersList.Add("8") 
    numbersList.Add("1") 
    numbersList.Add("1") 
    numbersList.Add("2") 
    numbersList.Add("8") 
    numbersList.Add("9") 
    numbersList.Add("1") 
    numbersList.Add("1") 
    Dim count As Integer = 0 
    For Each value In numbersList 
     If value.Equals("1") Then count += 1 
    Next 
    Return count 

End Function 

Answer 1

衝突。

return numbersList.asEnumerable.Count(Function(v) v ="1") 

ドミトリーBychenkoは（C＃の風味が）提案されているように、あなたがこれを行うことが...

return "1762728381128911".Count(function(v) v = "1")