以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 集合能排序吗 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=29110) |
-- 作者:lsfdf -- 发布时间:2013/2/27 20:14:00 -- 集合能排序吗 集合能排序吗,有个日期集合,我想取最大日期,该如何写呢 |
-- 作者:程兴刚 -- 发布时间:2013/2/27 20:24:00 -- 能!
Dim Lst As New List(Of String) |
-- 作者:hbhb -- 发布时间:2014/9/19 0:17:00 -- 谢谢!请问指定排序如何搞(”张飞“,”赵云“,”刘邦“)改成(”刘邦“,”赵云“,”张飞“)? |
-- 作者:程兴刚 -- 发布时间:2014/9/19 0:21:00 -- 既然能指定,那就重新建立集合值!按照顺序添加即可! |
-- 作者:hbhb -- 发布时间:2014/9/19 0:33:00 -- 现在的情况是从某一列获取值的时候,有可能没有某个值,如果三人全,按(”刘邦“,”赵云“,”张飞“)排列,不全也按此顺序排列,空值不显示,如何搞? |
-- 作者:程兴刚 -- 发布时间:2014/9/19 0:40:00 -- 我说的就是这个意思,根据排序指定内容逐个判断,有则新增一个值,无则跳过,自然就是您的自定义排序了! |
-- 作者:hbhb -- 发布时间:2014/9/19 0:56:00 -- 请教简易代码? Dim Lst As New List(Of String) Lst.Add( "电视机") Lst.Add("洗衣机") Lst.Add("电冰箱") Dim Lst1 As New List(Of String) For i As Integer = 0 To lst.Count - 1 Select Case lst(i) Case "洗衣机" lst1.add("洗衣机") End Select Next For i2 As Integer = 0 To lst.Count - 1 Select Case lst(i2) Case "电冰箱" lst1.add("电冰箱") End Select Next For i3 As Integer = 0 To lst.Count - 1 Select Case lst(i3) Case "电视机" lst1.add("电视机") End Select Next For i1 As Integer = 0 To lst1.Count - 1 Output.show(lst1(i1)) Next |
-- 作者:有点甜 -- 发布时间:2014/9/19 9:10:00 -- 你排序规则是什么,根据什么排序,这个必须指定 |
-- 作者:程兴刚 -- 发布时间:2014/9/19 10:06:00 -- 回7楼:
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=57150 |