Mega Code Archive

 

Categories / VB.Net / Data Structure

 

Array TrueForAll(Of (T))

Imports System Public Class Example     Public Shared Sub Main()         Dim letters() As String = { "E", "B",   "A", "Z", "D", "X",  "Y","Q" }         Console.WriteLine(Array.TrueForAll(letters, AddressOf EndsWithS))     End Sub     Private Shared Function EndsWithS(ByVal s As String) As Boolean         If (s.Length > 5) AndAlso (s.Substring(s.Length - 6).ToLower() = "S") Then             Return True         Else             Return False         End If     End Function End Class