今天学习了刘金玉老师VB编程教程的第25期，学习的主要内容是选择排序法。
1.选择排序法就是在冒泡排序法的基础上的一个升级。它没有每一趟的比较中将值进行交换，而是一趟交换一次值。每一趟比较出来，我们筛选出最小(大）值的索引，然后每一趟中，根据这个索引去进行值的交换。每次对数据的比较过程中，筛选出最小(大）的按个值的索引，然后再交换。
2.掌握选择排序法的原理:关键是记录最小值的索引。
3.每一轮比较的时候，只能与后面的数值去比较，因为我们已经把最小的数值放在最前面。
4.案例：新建7个text控件组，将text属性内的数据按从小到大的顺序进行排序。
①输入代码：
Private Sub Command1_Click()
Dim i%, j%
For i = 0 To 6 Step 1 '代表有几趟比较
Dim mindex%
mindex = i
For j = i l To 6 Step 1
If Val(Text1(mindex).Text) > Val(Text1(j).Text) Then
mindex = j
End If
Next j
Dim t%
t = Val(Text1(i).Text)
Text1(i).Text = Val(Text1(mindex).Text)
Text1(mindex).Text = t
Next i
End Sub
②点击运行后，我们可以看到运行代码后，将文本框内的数据自动从小到大进行排列，我们也可以在上面七个文本框内输入想要排序的数据，然后运行得到排序的结果。
今天又是一节烧脑的课程，慢慢消化吧。
