主题：集合获取最大值的问题

Dim s As Integer

Dim a As New List(of Integer)

a .Add(108)

a .Add(95)

a .Add(70)

a .Add(100)

a .Add(1081)

a .Add(905)

a .Add(700)

a .Add(1000)

a.Sort

s =a(a.count-1)

Output.Show(s)

上面的代码可以获取集合中的最大值，哪位老师指导一下有没有方法完成这样的需求：集合中的值每三个一组分别获取最大值，然后添加到一个新集合里。就是

108,95,70,获取108,

100,1081，905获取1081，

700,1000获取1000，

然后把获取的各个组的最大值添加到一个新集合中，哪位老师指导一下，怎么解决？？？

还有个问题就是集合排序a.Sort后，还能撤销排序再变回排序前的顺序吗？