Imports System.IO
Imports System.Reflection
Imports System.Linq
Imports System.Xml.Linq
Public Class MainClass
Public Shared Sub Main
Dim words = New String() {"this", "is", "a test"}
Dim longestLength = Aggregate word In words _
Into Max(word.Length)
Console.WriteLine("The longest word is " & longestLength & " characters long.")
End Sub
End Class
|