设为首页 - 加入收藏
广告 1000x90
您的当前位置:黄大仙www78345 > 交换排列 > 正文

VB!! 使用数组编写一个冒泡排序法的演示过程 程序演示冒泡法每

来源:未知 编辑:admin 时间:2019-06-16

  VB!! 使用数组编写一个冒泡排序法的演示过程 程序演示冒泡法每次循环中交换相邻元素后的数组排序结果

  VB!! 使用数组编写一个冒泡排序法的演示过程 程序演示冒泡法每次循环中交换相邻元素后的数组排序结果

  程序演示冒泡法每次循环中交换相邻元素后的数组排序结果。提示1构造一个0-9的循环,比较数组中有相邻元素的值,若逆序则交换2设置一个计时器计数,显示循环次数3显示交换后的数组排序...

  可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整个问题。

  既然要演示成动画一样,本题的难点在于在Timer控件的timer事件中,构造出模拟双层冒泡排序的循环,既然是双层循环,所以需要两个循环变量i,j,我们这里利用i控制外层循环,j控制内层循环。然后我们需要一个数组arr,需要一个计算循环了多少次的累加变量n,然后需要一个冒泡排序的中转站变量m。于是我们在模块的顶部,需要定义上面五个变量,如下:

  那么到我们点击开始的时候,根据你的题意,需要完成第一,将textbox1的数字读入到数组arr中,然后对内外层循环变量进行初始化,并且启动计时器,于是代码如下:

  在Timer1控件内部,我们要做的,就是在Textbox2中,显示每一次循环的值,然后对各种变量进行处理,代码如下:

  Ifarr(j)arr(j+1)Then判断如果前面的数大于后面的数,那么交换两个数,所以最终将使数字升序排列

  Ifj=i+1Theni=i-1:j=0内层循环变量j大于i的值,那么对i值进行处理,进入下一层循环,初始化i值和j值

本文链接:http://apkhealth.com/jiaohuanpailie/350.html

相关推荐:

网友评论:

栏目分类

现金彩票 联系QQ:24498872301 邮箱:24498872301@qq.com

Copyright © 2002-2011 DEDECMS. 现金彩票 版权所有 Power by DedeCms

Top