Foxtable(狐表)用户栏目专家坐堂 → 我想对Jarray进行排序


  共有2418人关注过本帖平板打印复制链接

主题:我想对Jarray进行排序

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


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/23 17:37:00 [只看该作者]

找不到简单方法

Dim json As String  = "[{'Name' : 'Jack', 'Age' : 34}, {'Name' : 'Tomas', 'Age' : 26}, {'Name' : 'Allen', 'Age' : 50}]"
Dim ja = JArray.Parse(json)

Dim d As new sortedDictionary(of Integer,object)
Dim ja2 As new JArray

For Each j As JToken In ja
    d.add(j("Age"),j)
Next

For Each v As object In d.values
ja2.Add(v)
Next

Output.Show(ja2.ToString)


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