以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  编程基础 数组 问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176342)
--  作者：jiawei507
--  发布时间：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=6、C=7、A=8

 

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

 

刚学到这里谢谢！
--  作者：有点蓝
--  发布时间：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
--  发布时间：2022/4/9 14:18:00
--  
谢谢