Contact: aviboots(AT)netvision.net.il
39,955 questions
51,897 answers
573 users
Imports System Imports System.Linq Public Class Program Public Shared Sub Main() Dim str As String = "vb.net 2874 programming 901" Dim count = str.Count(Function(x) Char.IsDigit(x)) Console.Write(count) End Sub End Class ' run: ' ' 7 '
Imports System Imports System.Linq Public Class Program Public Shared Sub Main() Dim str As String = "vb.net 2874 programming 901" Dim count = str.Count(AddressOf Char.IsDigit) Console.Write(count) End Sub End Class ' run: ' ' 7 '