主题：[求助]日期排序及求最大值及最小值

例如：

Dim d1 As Date = #10/08/2016 10:25#
Dim d2 As Date = #10/10/2016 16:32#
Dim d3 As Date = #10/13/2016 12:00#
Dim d4 As Date = #10/15/2016 18:00#
Dim d5 As Date = #10/16/2016 11:00#
Dim d() As Date = {d1,d2,d3,d4,d5}
Array.sort(d)
Output.Show(d(0))
Output.Show(d(4))

集合就更简单了，留给您的作业