Foxtable(狐表)用户栏目专家坐堂 → 用 FileSys.GetFiles 得到的文件名集合能否自动按一定规则排序?


  共有3119人关注过本帖树形打印复制链接

主题:用 FileSys.GetFiles 得到的文件名集合能否自动按一定规则排序?

帅哥哟,离线,有人找我吗?
jerzhh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:166 积分:1467 威望:0 精华:0 注册:2014/3/4 15:30:00
用 FileSys.GetFiles 得到的文件名集合能否自动按一定规则排序?  发帖心情 Post By:2014/8/21 14:05:00 [只看该作者]

用 FileSys.GetFiles 得到的文件名集合能否自动按一定规则排序?

 

比方说按文件名排序,或按扩展名排序存放在集合中。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/21 14:17:00 [只看该作者]

 无法排序,获取以后,你遍历重新排列再放在集合里面。

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/8/21 14:26:00 [只看该作者]

Dim ls() As String = System.IO.Directory.GetFiles("d:\")
Array.Sort(ls)
For Each File As String In ls
    Output.Show(File)
Next

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/8/21 15:23:00 [只看该作者]

以下是引用Bin在2014-8-21 14:26:00的发言:
Dim ls() As String = System.IO.Directory.GetFiles("d:\")
Array.Sort(ls)
For Each File As String In ls
    Output.Show(File)
Next

新方法,好方法。


 回到顶部
帅哥哟,离线,有人找我吗?
jerzhh
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:166 积分:1467 威望:0 精华:0 注册:2014/3/4 15:30:00
  发帖心情 Post By:2014/8/21 15:31:00 [只看该作者]

以下是引用Bin在2014-8-21 14:26:00的发言:
Dim ls() As String = System.IO.Directory.GetFiles("d:\")
Array.Sort(ls)
For Each File As String In ls
    Output.Show(File)
Next

 

谢谢!

 

再请教 Array.Sort 的降序用法


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/21 15:36:00 [只看该作者]

Dim ls() As String = System.IO.Directory.GetFiles("d:\")
Array.Sort(ls)
Array.Reverse(ls)
For Each File As String In ls
    Output.Show(File)
Next

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/8/21 15:38:00 [只看该作者]

Dim ls() As String = System.IO.Directory.GetFiles("C:\Documents and Settings\Administrator\桌面\CaseStudy")
Array.Sort(ls)
Array.Reverse(ls)
For Each File As String In ls
    Output.Show(File)
Next

 回到顶部
帅哥哟,离线,有人找我吗?
jerzhh
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:166 积分:1467 威望:0 精华:0 注册:2014/3/4 15:30:00
  发帖心情 Post By:2014/8/21 16:40:00 [只看该作者]

以下是引用有点甜在2014-8-21 15:36:00的发言:
Dim ls() As String = System.IO.Directory.GetFiles("d:\")
Array.Sort(ls)
Array.Reverse(ls)
For Each File As String In ls
    Output.Show(File)
Next

 

非常感谢。

 

那么请问集合是否有类似Array的共享成员?

 

比如说:

 

Dim Products As List(Of String)
Products = DataTables("产品").GetValues("产品名称")

List.Sort(Products)
List.Reverse(Products)

For Each Product As String In Products
    Output.Show(Product)

Next

 

这样可以吗?
 
还有字典Dictionary呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/21 16:44:00 [只看该作者]

不可以。字典和List没有。如果要用,你可以用toArray以后,再排序。


 回到顶部
帅哥哟,离线,有人找我吗?
pcxjxjhkw
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2014/12/11 16:44:00 [只看该作者]


 回到顶部
总数 11 1 2 下一页