用VB6.0对一批随机数进行排序（插入平移排序）

1、启动VB6.0，新建一个标准exe工程。

2、在窗体上绘制一个命令按钮，名称为Command1。

3、双击命令按钮进入代码窗口。

4、编写命令按钮的单击事件。定义一个一维数组A有10个元素（1-10），随机产生一批两位数的随机数，有序地装入A（i）中，输出A(i)，排序完成时方便观察比较。

5、编写一个Sub排序过程，具体内容请看图片中的注释（蓝色字为注释内容）

6、回到按钮的事件过程往下编写函数的调用和a(i)输出语句。

7、按F5运行测试。