Foxtable(狐表)用户栏目专家坐堂 → 请教,有汉字数组,如何实现进行排序?


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

主题:请教,有汉字数组,如何实现进行排序?

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2010/2/10 9:49:00 [显示全部帖子]

dim s() as string = {"我们","中国","中央","社会","集体"}
Dim ls As New List(Of String)
ls.AddRange(s)
ls.Sort
For Each a As String in ls
    Output.Show(a)
Next
Output.Show("----------------------")
s = ls.ToArray
For Each a As String in s
    Output.Show(a)
Next


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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2010/2/10 11:46:00 [显示全部帖子]


List变量再申明的时候可以用数组初始化,所以

Dim ls As New List(Of String)
ls.AddRange(s)


可以简化为
Dim ls As New List(Of String)(s)

 回到顶部