主题：如何得到指定日期当年的最后一天和第一天的日期

帮助中有的。

Dim FirstDay As Date = New Date(year(Today()),1,1)
Dim LastDay As Date = New Date(year(Today()),12,Date.DaysInMonth(year(Today()),12))
Output.Show(FirstDay)
Output.Show(LastDay)