Foxtable(狐表)用户栏目专家坐堂 → 编程基础 数组 问题


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

主题:编程基础 数组 问题

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


加好友 发短信
等级:幼狐 帖子:65 积分:707 威望:0 精华:0 注册:2021/6/12 9:21:00
编程基础 数组 问题  发帖心情 Post By:2022/4/9 11:23:00 [只看该作者]

Dim d1() As String = {"A","B","C"} '学生姓名
Dim d2() As Integer = {8, 6, 7} '对应分数
Array.Sort(d2, d1) '第一个数组为排序数组,第二个数组跟随第一个数组排序
Output.Show(d1(0) & "=" & d2(0))
Output.Show(d1(1) & "=" & d2(1))
Output.Show(d1(2) & "=" & d2(2))

结果是 B=6C=7A=8

 

第三行为什么不能用reverse 这个属性吗? 如果想结果是 A=8 c=7 B=6 该怎么写?

 

刚学到这里谢谢!


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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/9 11:54:00 [只看该作者]

倒序取值不就行了

Dim d1() As String = {"A","B","C"} '学生姓名
Dim d2() As Integer = {8, 6, 7} '对应分数
Array.Sort(d2, d1) '第一个数组为排序数组,第二个数组跟随第一个数组排序
For i As Integer = d1.Length - 1 To 0 Step -1
    Output.Show(d1(i) & "=" & d2(i))
Next

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


加好友 发短信
等级:幼狐 帖子:65 积分:707 威望:0 精华:0 注册:2021/6/12 9:21:00
  发帖心情 Post By:2022/4/9 14:18:00 [只看该作者]

谢谢

 回到顶部