参考代码
Dim ls As new List(of String)ls.add("aaa")ls.add("ccc")ls.add("bbb")ls.Sortmsgbox(ls(ls.count-1))