Counts how many items are in your Favorites folder
Imports System.IO Imports System.Reflection Imports System.Linq Imports System.Xml.Linq Public Class MainClass Public Shared Sub Main Dim FavPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Favorites) Dim FavSize = Aggregate file In New DirectoryInfo(FavPath).GetFiles() _ Into Count() Console.WriteLine("There are " & FavSize & " files in your Favorites folder.") End Sub End Class