编写一个VB程序，实现程序功能如下：打开程序时，随机产生10个两位正整数存入数组a中，并在列表框List1中显示。单击“排序”按钮Command1后，在列表框List2中显示左右交替上升序列，程序运行界面如下图所示。排序方法：使用选择排序算法将数组改造成左右交替上升序列，即将最小值放在最左端，第2小值放在最右端；再将第3小值放到左端，第4小值放到右端。以此类推，直到形成左右交替上升序列。例如将数组a = (4,8,2,9,3,6,1,7,5,10)，排序成a = (1,3,5,7,9,10,8,6,4,2)。