《选择法》排序的动画演示.docVIP

沈 阳 航 空 工 业 学 院 课程设计 学 号 200604034026 班 级 6403401 姓 名 苑春雨 指导教师 刘 成 2008年 03 月 20 日课程设计任务书 沈阳航空工业学院 课程设计任务书 学院：航宇 专业：工程力学 班级：6403401 学号：200604034026 题目：“选择法”排序的动画演示 一、课程设计时间 2007~08第2学期第1~2周，共计2周，40学时。 二、课程设计内容 用控件数组技术实现动画，演示用选择法对数组（18,12,16,10,11,19,13,19）由大到小排序、元素变换的完整过程。 要求：准备换值的2个元素，使用显眼颜色、闪烁效果。 三、课程设计要求 程序质量： 贯彻事件驱动的程序设计思想。 用户界面友好，功能明确，操作方便；可以加以其它功能或修饰。 代码应适当缩进，并给出必要的注释，以增强程序的可读性。 课程设计说明书： 课程结束后，上交课程设计说明书和源程序。课程设计说明书的内容参见提供的模板。 四、指导教师和学生签字 指导教师：________ 学生签名：________ 五、成绩 六、教师评语  目 录 需求分析------------------------------- 2 设计分析------------------------------- 2 关键技术------------------------------- 5 总结 ------------------------------- 7 完整程序------------------------------- 8 参考文献------------------------------- 11 需求分析 1．用控件数组技术实现动画，演示用选择法对数组（18,12,16,10,11,19,13,19）由大到小排序、元素变换的完整过程。 2要求：准备换值的2个元素，使用显眼颜色、闪烁效果 3用户界面友好，功能明确，操作方便；可以加以其它功能或修饰 4代码应适当缩进，并给出必要的注释，以增强程序的可读性。 设计分析 1基本原理：运用选择法排序，用循环体实现，并通过设置颜色来展示动画。 2. 总体设计：选择法排序,将数组全部陈列出来，再用颜色区别相交换的两个数,分六步来实现，从而实现动态效果。 3详细设计：将数组都陈列出来，每一步就是数组变化的过程。第一列是出现原数组。第二列是第一步选择出最大的数和第一位的数进行交换。第三列是在剩余的数中悬出最大的数再和第二位的数进行交换。依次类推，直到将数组按照从大到小的顺序排列出来。最后的一列既是所求。 关键技术 1、界面设计如下： 2、运行界面如下： 3、选择法排序程序如下： For i = 1 To n b(1, i) = a(i) Label1(i).Caption = b(1, i) Next i For i = 1 To n - 1 max = i For j = i + 1 To n If a(j) a(max) Then max = j Next j c(i) = max b(i, max) = a(max) t = a(i) a(i) = a(max) a(max) = t For m = 1 To 8 b(i, m) = a(m) Next m Next i 4、结束语句如下： Private Sub Command2_Click() Unload Me End Sub 总结 这次我的题目是选择法排序,通过这次实习,我知道了排序的基本程序段,并且解决了实现动画效果这一关键技术. 在课设过程中，我遇到了重重困难，但通过老师的指点和自己查阅资料，我克服了困难，顺利的完成了任务。同时我也了解了VB的出现是一场技术革命，它给人们的生活带来了很多方便和好处，它在生活中各个方面都能发挥巨大的作用，所以，对于我们大学生来说，学好VB不仅是自己的需要，更是社会发展的需要 完整程序 Option Base 1 Private Sub Command1_Click() Dim a