VB程序設(shè)計(jì)課程設(shè)計(jì)報(bào)告

1、 VB 程序設(shè)計(jì)課 程設(shè)計(jì)報(bào)告（ 2016 2017 學(xué)年第 1 學(xué)期）題目：排序演示學(xué)院：經(jīng)濟(jì)與管理學(xué)院班級(jí)：物流管理 1502學(xué)號(hào)：姓名：指導(dǎo)教師：阮冰時(shí)間：起2017年 1月 3日止1月6日1一、課程設(shè)計(jì)基本信息課程代碼： 05190124課程名稱：計(jì)算機(jī)基礎(chǔ)課程設(shè)計(jì)課程英文名稱 : Computer-based Course Design課程所屬單位（院（系）、教研室）：數(shù)學(xué)與計(jì)算機(jī)學(xué)院計(jì)算機(jī)基礎(chǔ)課程群課程面向?qū)I(yè)：生物科學(xué)類、制藥工程、制藥工程 (生物制藥 )、藥物制劑、物流管理課程類型：必修課先修課程：大學(xué)計(jì)算機(jī)基礎(chǔ)通識(shí)選修課程、Visual Basic 程序設(shè)計(jì)課程學(xué)分： 1總學(xué)

2、時(shí)： 16二、課程設(shè)計(jì)目標(biāo)掌握所學(xué)語言程序設(shè)計(jì)的方法， 熟悉所學(xué)語言的開發(fā)環(huán)境及調(diào)試過程， 熟悉所學(xué)語言中的數(shù)據(jù)類型，數(shù)據(jù)結(jié)構(gòu)、語句結(jié)構(gòu)、運(yùn)算方法，鞏固和加深對(duì)理論課中知識(shí)的理解，提高學(xué)生對(duì)所學(xué)知識(shí)的綜合運(yùn)用能力。通過綜合設(shè)計(jì)要求達(dá)到下列基本技能：1培養(yǎng)查閱參考資料、手冊(cè)的自學(xué)能力，通過獨(dú)立思考深入鉆研問題，學(xué)會(huì)自己分析、解決問題。2通過對(duì)所選題目方案分析比較，確立方案，編制與調(diào)試程序，初步掌握程序設(shè)計(jì)的方法，能熟練調(diào)試程序。3系統(tǒng)設(shè)計(jì)編程簡(jiǎn)練，可用，功能全面，并有一定的容錯(cuò)能力。用戶界面良好，有較好的輸出功能。在完成課題基本要求后，具有創(chuàng)新型設(shè)計(jì)，具有一定的實(shí)用價(jià)值。4根據(jù)個(gè)人的設(shè)計(jì)調(diào)試過程

3、，撰寫設(shè)計(jì)報(bào)告。三、課程設(shè)計(jì)內(nèi)容利用已掌握的VB 程序設(shè)計(jì)語言基礎(chǔ)，以及面向?qū)ο蟮某绦蛟O(shè)計(jì)方法、事件驅(qū)動(dòng)的編程方式， 進(jìn)行應(yīng)用程序和系統(tǒng)的開發(fā)設(shè)計(jì)。在強(qiáng)化鞏固已有編程知識(shí)基礎(chǔ)之上，訓(xùn)練新的設(shè)計(jì)與編程思路，通過綜合應(yīng)用所學(xué)知識(shí)設(shè)計(jì)、編制、調(diào)試實(shí)用的Visual Basic 程序。四、課程設(shè)計(jì)要求1. 要求每個(gè)同學(xué)都要認(rèn)真對(duì)待，積極參與。2. 課程設(shè)計(jì)結(jié)束時(shí)， 提交完成的所有源程序、 相關(guān)文件和可執(zhí)行文件。 同時(shí)填寫并完成課程設(shè)計(jì)報(bào)告冊(cè) 。3. 不符合要求的程序、 設(shè)計(jì)報(bào)告、 抄襲的設(shè)計(jì)報(bào)告或源程序代碼、 在設(shè)計(jì)中完全未參與的將作不及格處理。五、考核方式指導(dǎo)老師負(fù)責(zé)驗(yàn)收程序的運(yùn)行結(jié)果，并結(jié)合學(xué)生的

4、工作態(tài)度、實(shí)際動(dòng)手能力、 創(chuàng)新精神和設(shè)計(jì)報(bào)告等進(jìn)行綜合考評(píng)，百分制計(jì)算，具體考核標(biāo)準(zhǔn)主要包含以下幾個(gè)部分：1. 程序運(yùn)行情況 20 分2. 程序功能的完善程度 10 分3. 程序結(jié)構(gòu)的合理性 10 分24. 對(duì)問題的答辯情況 20 分5. 創(chuàng)新情況 10 分6.學(xué)生的工作態(tài)度與獨(dú)立工作能力10 分7.設(shè)計(jì)報(bào)告內(nèi)容的規(guī)范性20 分備注 :1.按規(guī)定時(shí)間填寫各階段文檔，學(xué)習(xí)態(tài)度加5 分2.設(shè)計(jì)報(bào)告內(nèi)容雷同扣40 分，無調(diào)試過程問題分析扣10 分，無參考文獻(xiàn)扣10 分3. 源程序無注釋則在程序結(jié)構(gòu)合理性扣10 分六、課程設(shè)計(jì)主要參考資料 Visual Basic 程序設(shè)計(jì)教程第 4 版龔沛曾高等教育

5、出版社 Visual Basic 程序設(shè)計(jì)實(shí)驗(yàn)指導(dǎo)與測(cè)試第 4 版龔沛曾高等教育出版社 Visual Basic 從入門到精通清華大學(xué)出版社 Visual Basic 課程設(shè)計(jì)王棟清華大學(xué)出版社 Visual Basic 開發(fā)實(shí)戰(zhàn)1200 例孫秀梅，鞏建華清華大學(xué)出版社七、課程設(shè)計(jì)計(jì)劃安排時(shí)間任務(wù)課程設(shè)計(jì)前一周選擇課程設(shè)計(jì)題目， 分析課題的要求， 確定設(shè)計(jì)方案， 完成報(bào)告冊(cè)中“課程設(shè)計(jì)概述”課程設(shè)計(jì)第1天按功能模塊編寫詳細(xì)設(shè)計(jì)說明，完成報(bào)告冊(cè)中“總體設(shè)計(jì)”課程設(shè)計(jì)第2天編寫程序、調(diào)試程序課程設(shè)計(jì)第3天編寫程序、調(diào)試程序，完成報(bào)告冊(cè)中“詳細(xì)設(shè)計(jì)”課程設(shè)計(jì)第4天調(diào)試程序，完成報(bào)告冊(cè)中“調(diào)試分析過程

6、”課程設(shè)計(jì)第5天完成報(bào)告冊(cè)中“總結(jié)”、“參考文獻(xiàn)”、“課程設(shè)計(jì)評(píng)審表”部分內(nèi)容，提交課程設(shè)計(jì)報(bào)告、源程序、面試或答辯3一、課程設(shè)計(jì)概述課程本題主要是針對(duì)在程序設(shè)計(jì)中對(duì) 數(shù)值型數(shù)據(jù)進(jìn)行排序的問題， 這雖然是最基本的數(shù)據(jù)處理操作， 但本題不僅綜合了四種不同的排序算法：設(shè)比較法、選擇法、直接插入法和冒泡法，也涉及到了一些窗體編輯器，快捷菜單的做法，定時(shí)器的編碼，使得本題更加的復(fù)雜，也增加了本題計(jì)的理解難度。問本程序以動(dòng)畫方式演示上述四種排序算法的排序過程，并可以比較題 四種算法所需交換數(shù)據(jù)的次數(shù)，從而對(duì)四種排序算法有一個(gè)比較直觀的認(rèn)識(shí)，也可以對(duì)四種排序算法的排序效率進(jìn)行對(duì)比。本程序還可以找出描所產(chǎn)生

7、的 10 個(gè)隨機(jī)數(shù)中的最大值、最小值和平均值。述設(shè)計(jì)要求設(shè)計(jì)目的1. 對(duì)所選題目方案分析比較，確立方案。2. 用戶界面良好，有較好的輸入輸出能力。3. 編制與調(diào)試程序， 初步掌握程序設(shè)計(jì)的方法， 能熟練調(diào)試程序。4. 程序運(yùn)行情況正常，程序功能完善，程序結(jié)構(gòu)合理。5. 系統(tǒng)設(shè)計(jì)編程可用，簡(jiǎn)練，并有一定的容錯(cuò)能力。6. 在完成基本要求后，最好能有一定的創(chuàng)新。1. 以計(jì)算機(jī)語言程序設(shè)計(jì)（ VB ）課程為基礎(chǔ)，目的是進(jìn)一步培養(yǎng)學(xué)生綜合應(yīng)用 VB 的各種編程知識(shí)和技巧進(jìn)行程序設(shè)計(jì)的能力對(duì)本學(xué)期VB課程學(xué)習(xí)的一個(gè)總結(jié)，對(duì)所學(xué)知識(shí)的鞏固與加深。2. 開發(fā)和挖掘我們的創(chuàng)新和實(shí)踐能力， 使我們達(dá)到具備設(shè)計(jì)功能

8、較為復(fù)雜的 Windows 應(yīng)用程序的能力。3. 通過課程設(shè)計(jì)， 培養(yǎng)我們自主學(xué)習(xí)和獨(dú)立創(chuàng)新的精神， 也是人才培養(yǎng)體系中極為重要的一環(huán)。4. 掌握所學(xué)語言程序設(shè)計(jì)的方法，熟悉所學(xué)語言的開發(fā)環(huán)境及調(diào)試過程，熟悉所學(xué)語言中的數(shù)據(jù)類型，數(shù)據(jù)結(jié)構(gòu)、語句結(jié)構(gòu)、運(yùn)算方法，鞏固和加深對(duì)理論課中知識(shí)的理解， 提高學(xué)生對(duì)所學(xué)知識(shí)的綜合運(yùn)用能力。4開發(fā)環(huán). 操作系統(tǒng)： Windows10 Sever/XP/Professional. 處理器： 486DX/66 MHz或更高的處理器. 顯示器： VGA或更高分辨率的顯示器. 應(yīng)用軟件： Visual Basic 6.0境5二、總體設(shè)計(jì) (1)1. 程序啟動(dòng)后，顯示

9、圖6.1 所示的主界面。首先單擊“產(chǎn)生10 個(gè)隨機(jī)數(shù)”按鈕來產(chǎn)生10 個(gè)隨機(jī)數(shù)，并顯示在10 個(gè)文本框中；然后選擇一種“演示模式”和“排序方式” ，其中演示模式可以直接給出排序結(jié)果，也可以通過動(dòng)畫動(dòng)態(tài)演示整個(gè)排序過程，排序方式可以按從小到大順序，也可以按從大到小順序排序。系統(tǒng)功能需求分析圖 6.1 啟動(dòng)后的主界面2. 在主窗口的空白區(qū)單擊鼠標(biāo)右鍵，彈出如圖6.2 所示的快捷菜單。從中選擇“排序算法”命令，打開圖6.3 所示的對(duì)話框，從中選擇一種排序方式，單擊不同排序方式時(shí)， “算法描述”中簡(jiǎn)要介紹了這種算法。單擊“確定”按鈕返回到主窗口，主窗口中最上方框架控件的標(biāo)題文字顯示當(dāng)前所選的排序算法。

10、圖 6.2 快捷菜單圖 6.3 “排序算法選擇”對(duì)話框快捷菜單中有一“從文件讀取數(shù)據(jù)”命令，使用此命令可以從當(dāng)前目錄的 data.txt 文件中讀入 10 個(gè)數(shù)。要使用這個(gè)命令，必須事先建立這個(gè)文本文件。63. 設(shè)置完畢， 單擊“開始排序” 按鈕 (此按鈕在生成數(shù)據(jù)之前是不可用的 )啟動(dòng)排序過程。若選擇了動(dòng)畫方式 (見圖 6.4)，紅色背景的文本框表示當(dāng)前正在比較的元素， 黃色的代表己排序的元素， 兩個(gè)運(yùn)動(dòng)的文本框表示交換過程。 在排序過程中可以調(diào)節(jié)水平滾動(dòng)條來控制演示的速度。 排序結(jié)束后程序以消息框的形式報(bào)告數(shù)據(jù)交換的次數(shù) (如圖 6.5)。可以使用快捷菜單中的“將數(shù)據(jù)寫入文件”命令將排序后

11、的數(shù)據(jù)保存到“ data.txt ”中覆蓋原有內(nèi)容。圖 6.4 程序主界面4. 選擇窗口主菜單中的“顏色設(shè)置”命令，主窗口擴(kuò)大，底部顯示“顏色設(shè)置”框架 (如圖 6.6 所示 )，可以對(duì)“文本背景色” 、“文本前景色” 、“已排序元素色”和“交換結(jié)點(diǎn)色”進(jìn)行設(shè)置。再選擇此命令，窗口恢復(fù)到原來大小。圖 6.5 顯示交換次數(shù)圖 6.6 系統(tǒng)主菜單圖 6.7 確認(rèn)退出對(duì)話顏色設(shè)置5. 選擇“退出”命令可退出本程序，程序顯示圖6.7 所示的對(duì)話框予以確認(rèn)。7系統(tǒng)總體設(shè)計(jì)框架排序演示二、總體設(shè)計(jì) (2)窗1.基本窗體控件設(shè)計(jì)體設(shè)2.菜單編輯器計(jì)-快捷菜單的彈出3.定時(shí)器的編碼4.窗體編輯器-多重窗體1.

12、四種排序方法（比較法、選擇法，直接編插入法和冒泡法 ）寫代2.最大值，最小值，平碼均值的計(jì)算3.動(dòng)畫演示4.對(duì)話框彈出8三、詳細(xì)設(shè)計(jì)1. 窗體設(shè)計(jì)主要功能模塊源程序1四個(gè) Frame 控件 -第一個(gè) Frame 控件包含此問題的基本運(yùn)算的也是時(shí)刻會(huì)發(fā)生變化的控件。第二個(gè)和第三個(gè)Frame 控件主要是對(duì)此程序運(yùn)行方式的選擇。第四個(gè) Frame 控件實(shí)質(zhì)是菜單項(xiàng)中 “顏色設(shè)置”單機(jī)事件的結(jié)果，是對(duì)第一個(gè) Frame 中控件運(yùn)行時(shí)的顏色設(shè)置。2 .1 個(gè)文本框數(shù)組 -包括 10 個(gè)隨機(jī)數(shù)文本框和兩個(gè)交換時(shí)運(yùn)動(dòng)著的文本框3. 菜單設(shè)計(jì) - 下拉式菜單分為兩部分，每部分功能不同。彈出式菜單分為三部分，第

13、一部分的單機(jī)事件會(huì)出現(xiàn)一個(gè)新的Form 窗體。9三、詳細(xì)設(shè)計(jì)4 .一個(gè)水平滾動(dòng)條-對(duì) Frame 中控件運(yùn)動(dòng)時(shí)的速度調(diào)控。5 五個(gè) command按鈕 - “產(chǎn)生十個(gè)隨機(jī)數(shù)” 命令按鈕 1（ 0）單擊事件會(huì)在前十個(gè)文本框中產(chǎn)生十個(gè)隨機(jī)數(shù)“開始排序”命令按鈕 1（ 2）在第二個(gè)和第三個(gè) Frame 中控件都被選擇后才會(huì)有效， 然后對(duì)十個(gè)隨機(jī)數(shù)進(jìn)行不同方式的排序?！?默認(rèn)值”命令按鈕2 是對(duì)文本框數(shù)組顏色設(shè)置的默認(rèn)按鈕。主要“停止” 命令按鈕1（2）在情況下才有效。“退出”命令按鈕3 是用來結(jié)束該程序的運(yùn)行。6一個(gè) timer 控件 -對(duì)此程序運(yùn)行時(shí)的時(shí)間間隔控制。7一個(gè) combo數(shù)組 -包括四

14、個(gè) combo控件Color1(0)文本背景色Color1(1)文本前景色Color1(2)已排序元素色Color1(3)交換元素色功能 2. 代碼設(shè)計(jì)模1.變量聲明塊Option ExplicitOption Base 1源Dim a(10) As Integer隨機(jī)數(shù)數(shù)組Dim First As Integer程Dim Second As IntegerPrivate mblnMoving As Boolean序Dim Speed As IntegerDim inColor1 As Long文本背景色Dim inColor2 As Long文本前景色Dim inColor3 As Long

15、已排序元素色Dim inColor4 As Long交換元素色Dim inNum As Long交換次數(shù)Public inSortMethod As Integer排序算法 0- 比較法， 1- 選擇法 2- 直接插入法， 3- 冒泡法Private inSortOrder As Integer排序方向 0- 升序 1- 降序Private inShowMode As Integer演示模式， 0- 直接求解， 1-動(dòng)態(tài)演示102 1command1（0） -產(chǎn)生十個(gè)隨機(jī)數(shù)Private Sub Command1（0）_Click()RandomizeFor i = 1 To 10a(i) =

16、 Int(Rnd * 201) - 100Text1(i).Text = a(i)Text1(i).BackColor=inColor1Text1(i).ForeColor = inColor2Next iCommand1.Enabled = True2command1（1）-開始排序Private Sub Option1_Click(Index As Integer)intShowMode = IndexEnd SubPrivate Sub Option2_Click(Index As Integer)intSortOrder = IndexEnd Sub當(dāng)排序結(jié)束后，會(huì)彈出如下一個(gè)對(duì)話框。

17、Frame2Frame3中option 的選擇直接關(guān)系到隨機(jī)數(shù)的排序方式response = MsgBox("比較法排序完畢，交換次數(shù)為："+Str(Num), vbOKOnly, " 系統(tǒng)提示")代碼為：3command1（2）- 停止程序的運(yùn)行Private Sub Command3_Click()If Command3.Caption = 停"止 " ThenTimer1.Enabled = FalseCommand3.Caption = 繼"續(xù) "ElseIf Command3.Caption =繼&quo

18、t;續(xù) " ThenTimer1.Enabled = TrueCommand3.Caption = 停"止 "End IfEnd IfEnd Sub4command2 -默認(rèn)顏色的按鈕11Private Sub Command2_Click()Color1(0).ListIndex = 0inColor1 = vbGreen文本背景色Color1(1).ListIndex = 1inColor2 = vbBlack文本前景色Color1(2).ListIndex = 2inColor3 = vbYellow已排序元素色Color1(3).ListIndex = 3

19、inColor4 = vbRed交換元素色5command3-退出按鈕3. combo數(shù)組名稱分別為Color1(0)文本背景色Color1(1)文本前景色Color1(2)已排序元素色Color1(3)交換元素色每個(gè) combo又有不同的list，都為黑色，綠色，藍(lán)色，青色，紅色，黃色紫色分布。用 index 區(qū)分Private Sub Color1_Click(Index As Integer)Dim i AsIntegerSelect Case IndexCase 0color1(0)Select Case Color1(0).ListIndexCase 0inColor1 = vbGr

20、eenCase 1inColor1 = vbBlueCase 2inColor41= vbRedCase 3inColor41= vbYellowEnd SelectFor I = 1 To 10Text1(I).BackColor = inColor1Next IEnd SelectFor i = 1 To 10Text1(i).BackColor = intColor1Next i文本背景色Combo1(0)的 list屬性，用index 區(qū)分 背 景顏色。Case 1color1(1) 文本前景色12Select Case Color1(1).ListIndexCase 0inColor

21、4 = vbGreenCase 1inColor4 = vbBlueCase 2inColor4 = vbRedCase 3inColor4 = vbYellowEnd SelectFor I = 1 To 10Text1(I).ForeColor = inColor2Next IEnd SelectFor i = 1 To 10Text1(i).ForeColor = intColor2Next iCase 2Select Case Color1(2).ListIndexCase 0inColor4 = vbGreenCase 1inColor4 = vbBlueCase 2inColor4

22、 = vbRedCase 3inColor4 = vbYellowEnd SelectFor I = 1 To 10Text1(I).ForeColor = inColor2Next IEnd SelectCase 3 ' 處理正在交換的結(jié)點(diǎn)的背景色 Select Case Color1(3).ListIndexCase 0inColor4 = vbGreenCase 1inColor4 = vbBlueCase 2inColor4 = vbRedCase 3inColor4 = vbYellowEnd SelectFor I = 1 To 10Combo1(1)的 list屬性，用i

23、ndex 區(qū)分 前 景顏色。Combo1(2) 的list屬性 ，用index區(qū) 分已排 序元素色。Combo1(3) 的 list屬性，用index 區(qū)分交換元素色。13Text1(I).ForeColor = inColor2Next IEnd SelectEnd Sub4. 開始排序Private Sub Command1（1）_Click()Dim Min As Integer, Max As Integer, s As SingleMin = 1000: Max = -1000: s = 0For i = 1 To 10If e(i) > Max Then Max = e(i)

24、If e(i) < Min Then Min = e(i)s = s + e(i)Next iText4.Text = Max最大值Text5.Text = Min最小值Text6.Text = s / 10平均值Command3.Enabled = TrueSelect Case intSortMethodCase 0比較法comparation_sort e(), intSortOrderCase 1選擇法selection_sort e(), intSortOrderCase 2直接插入法insertion_sort e(), intSortOrderCase 3冒泡法bubble

25、_sort e(), intSortOrderEnd SelectPrivate Sub Command1（2） _Click()Exit_ClickEnd Sub5彈出菜單PrivateSub Form_MouseUp(Button As Integer, Shift As Integer, x As Single, Y As Single)If Button = 2 ThenPopupMenu Menu2End IfEnd Sub146. 下拉式菜單Private Sub Color_Click()Form1.Height = Form1.Height + 2000Frame3.Visib

26、le = TrueColor.Checked = TrueEnd SubPrivate Sub Exit_Click()Dim I As IntegerI=MsgBox("您 真 的 要 退 出 嗎 ？ ",vbYesNo+vbQuestion+vbDefaultButton2, "請(qǐng)您確認(rèn)！ ")If I = vbYes ThenEndEnd IfEnd Sub8. 彈出菜單中排序算法 - 四種同時(shí)出現(xiàn)新窗體2 個(gè) Frame 控件 - 一個(gè)包含了一個(gè)option數(shù)組，是對(duì)排序方式的選擇另一個(gè)包含了一個(gè)text 控件，是對(duì)選中的option的解釋1 個(gè)

27、 command 按鈕，是和 Form1 的銜接， 決定了 Form1 中十個(gè)隨機(jī)數(shù)的排序方式15四、調(diào)試分析過程(1)1. 在程序一運(yùn)行時(shí)，沒有對(duì) speed 進(jìn)行初定量，在程序運(yùn)行后，動(dòng)態(tài)演示時(shí)，負(fù)責(zé)顯示交換元素的兩個(gè)文本框不運(yùn)動(dòng)，也沒有排序的作用。調(diào)試過程出現(xiàn)解決：在Form1 的 load 事件中增加了speed = 100語句。2下拉式菜單與快捷菜單分離不開的問導(dǎo)致快捷菜單不出現(xiàn)題下拉式菜單又出現(xiàn)太多選項(xiàng)及解解決：增加第二個(gè)主菜單“彈出式菜單”，且不可見。決3.快捷菜單無法彈出，且無法聯(lián)系到窗體。方彈出菜單要用PopupMenu方法在單擊“排序算法”時(shí)，出現(xiàn) Form2.show語句

28、，聯(lián)系到 Form1法4. 對(duì)四種排序方法的編程混淆不清在網(wǎng)絡(luò)上查找資料，先了解四種排序方法的特點(diǎn)和區(qū)別。用簡(jiǎn)單的語句解釋理解，然后隨機(jī)列舉幾個(gè)數(shù)字，用排序方法依次排大小，總結(jié)規(guī)律。寫出排序方法的代碼。5. 動(dòng)態(tài)演示如何演變用 Timer事件進(jìn)行編程。16四、調(diào)試分析過程(2)程序運(yùn)行后，單擊下拉式菜單，對(duì)顏色進(jìn)行設(shè)置，單擊“產(chǎn)生十個(gè)隨機(jī)數(shù)”，可以看到隨機(jī)數(shù)所在文本框的背景色和前景色發(fā)生改變，然后對(duì)演示模式和排序方式進(jìn)行選擇1. 當(dāng)選擇靜態(tài)演示時(shí)，會(huì)彈出如下對(duì)話框。單 擊確定后，發(fā)現(xiàn)排序和最值，平均值的運(yùn)算已完成。測(cè)試數(shù)2.當(dāng)動(dòng)態(tài)演示時(shí)，正在排序元素和已排序元素文本背景色發(fā)生變化，且兩個(gè)變化文本框會(huì)運(yùn)動(dòng)，在排序結(jié)束后，也會(huì)出現(xiàn)系統(tǒng)提示的對(duì)話框。據(jù)及測(cè)試結(jié)果還可以通過對(duì)水平滾動(dòng)條設(shè)置來調(diào)整交換速度單擊右鍵會(huì)彈出快捷菜單單擊“停止”按鈕時(shí)，排序運(yùn)動(dòng)會(huì)暫停，再次單擊時(shí)又會(huì)重新啟動(dòng)。17單擊“退出按鈕時(shí)” ，會(huì)出現(xiàn)對(duì)話框2. 第二個(gè)窗體的選擇也關(guān)系到第一個(gè)窗體的運(yùn)行Option的選擇不同，窗體一中的排序方法也不同。18五、總結(jié)設(shè) 1 多窗體的設(shè)計(jì)與銜接計(jì) 2 四種排序方法的運(yùn)用與編程用 3 彈出式菜單的運(yùn)用到 4 最大值，最小值，平均值的計(jì)算的 5 定時(shí)器的運(yùn)用使文本框進(jìn)行移動(dòng)知 6 滾動(dòng)條與 Frame 控件的運(yùn)用識(shí) 7