VB6.0二级题型一维数组元素排序
一维数组的排序题算是 VB 二级里常见的老面孔了，出得不难，但细节还挺考基本功。像数组声明、赋值、排序，这些操作你得烂熟于心，哪怕是手写代码都不能怵。
VB6.0 的一维数组用起来顺手，用Dim声明数组，想多大就多大，比如Dim arr(9) As Integer，从arr(0)到arr(9)刚好 10 个位置。
初始化也有两种方式，比较偷懒就用arr = Array(1,2,3...)，不过这个写法在 VB6.0 得留心点，它不太标准，保险的写法还是用For循环挨个赋值：
For i = 0 To 9
arr(i) = i + 1
Next i元素访问也没啥新鲜的，arr(0)是第一个，arr(9)是一个。要改值就像改变量那样，简单直接。
排序部分，常考的是冒泡、选择和插入。比如冒泡排序就挺适合数组小的时候用，写起来也不复杂，就是双层循环互换值：
For i = 0 To 8
For j = 0 To 8 - i
If arr(j) > arr(j + 1) Then
temp = arr(j)
arr(j) = arr(j + 1)
arr(j + 1) = temp
End If
Next j
Next iVB6.0 里没有现成的Sort函数，要用排序得自己写，或者引用自定义模块。别忘了数组里的最大值、最小值、平均数也经常被考，比如判断数组中有没有某个数、统计大于某值的个数之类。
如果你刚上手 VB，推荐你也看看VB6.0 动态数组声明训练，里面讲得挺清楚，适合配套练习。
，这类题没太多花活，重点就是熟练。你多写几遍，别的就都顺了。
文件大小：3.37KB
评论区