Query Date with Linq
Imports System.IO Imports System.Reflection Imports System.Linq Imports System.Xml.Linq Public Class MainClass Public Shared Sub Main Dim y = Year(Now) Dim m = Month(Now) Try Dim MeetingDates(5) As Date For i = 0 To UBound(MeetingDates) MeetingDates(i) = New Date(y, m, CInt((Date.DaysInMonth(y, m) - 1) * Rnd() + 1)) Next Dim CommonDates = From day2 In MeetingDates _ Order By day2 _ Select day2 Distinct For Each d In CommonDates Console.WriteLine(Format(d, "MM/dd/yy")) Next Catch ex As Exception Stop End Try End Sub End Class