选择排序流程图.docxVIP

技术（ ）班 技术（ ）班 学号 姓名 以升序为例 For For i=1 to n-1 ‘找最小值d(i) Next i ‘输出数组 每一次遍历从d(i)到d(n)中求到最小值放入d(i)中 ‘寻找下标 ‘寻找下标k If k i then ‘交换d(i),d(k) End if 从d(i)到d(n)中求到最小值的下标K K= K=i For j=i+1 to n If d(j)d(k) then k=j Next i  在文本框填写数据，按回车完成输入，并显示在LIST1中 点击排序，用选择排序算法完成排序并在LIST2中输出 ‘定义全局变量 ‘输入数据 Private Sub Text1_KeyPress(KeyAscii As Integer) ‘在text1中输入键盘按键引发的事件处理过程 If KeyAscii = 13 Then ‘如果该按键是回车键的话 text1.SetFocus ‘获取光标 End If End Sub  Private Sub Command1_Click() ‘排序 然后输出 End Sub