Anzahl der Occurance in der Liste der Nummern

Question

Ich habe ein kleines Problem in vb.net zu lösen, wo ich die Nummer des Auftretens der Nummer 1 in Zahlen 1762728381128911 zählen muss ich habe diese Lösungen, aber ich bin sicher, es gibt anspruchsvollere Weg zu tun Dies .

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

Sie nicht angeben, welcher Teil dieses Codes würden Sie ‚anspruchsvoller‘ machen möchten, aber Sie können Linq Werte zurückgeben verwenden

NB Sammlung machen muss asEnumerable() zu Erweiterungsmethode abholen, wenn Namen Zusammenstoß.

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

Denken Sie daran, Linq Namespace

imports System.Linq 

Auch, wie Dmitry Bychenko vorgeschlagen (wenn auch in C# Geschmack) zu importieren, können Sie dies tun ...

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