21aadec1518d

冒泡排序 每一个数字都和它下面的所有数字进行对比，如果比他小，进行互换，如果比他大，保持不变。 Sub 冒泡排序演示() Dim arr, temp, x, y, t, k ...