VB冒泡排序用法

1、在VB中打开一个窗体。

2、添加一个按钮控件,

3、打开代码窗口 输入代码:Dim n As Variantn = Array(17, 8, 66, 99, 11)

4、输入代码for i = 1 to4next i

5、最关键的一部：实现元素之间动交换如兔脒巛钒图：If n(J) > n(J + 1) ThenDim T As IntegerT = n(J)n(J) = n(J + 1)n(J + 1) = T

6、然后在窗体上输出排序后的数组！以上就是最简单动冒泡排序，主要需要理解每一次和没一趟是什么意思，并且懂得交换！