求Vb代码 ,求这些数(12 38 45 51 22 15 83 74 98 26 99 30 66 09 72)的 选择降序和升序排序输出、冒泡升序和降序排序输出,

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/16 00:50:48

求Vb代码 ,求这些数(12 38 45 51 22 15 83 74 98 26 99 30 66 09 72)的 选择降序和升序排序输出、冒泡升序和降序排序输出,
求Vb代码 ,求这些数(12 38 45 51 22 15 83 74 98 26 99 30 66 09 72)的 选择降序和升序排序输出、冒泡升
序和降序排序输出,

求Vb代码 ,求这些数(12 38 45 51 22 15 83 74 98 26 99 30 66 09 72)的 选择降序和升序排序输出、冒泡升序和降序排序输出,
以下为升序排列,降序把小于改成大于就可以.
Option Base 1
Option Explicit
Private Sub Command1_Click()
Dim ia,j%,t%,i%
ia = Array(12,38,45,51,22,15,83,74,98,26,99,30,66,9,72)
For i = 1 To 14
For j = 15 To i + 1 Step -1
If ia(j) < ia(j - 1) Then
t = ia(j)
ia(j) = ia(j - 1)
ia(j - 1) = t
End If
Next j
Print ia(j);
Next i
End Sub

求Vb代码 ,求这些数(12 38 45 51 22 15 83 74 98 26 99 30 66 09 72)的 选择降序和升序排序输出、冒泡升序和降序排序输出, 编程1000以内能整除37数平方的和求代码大谢用VB编 vb 编程 计算100~300之间所有能被3和7整除的数之和,求代码 求VB编程代码:判断一个数是否是素数? 怎么用VB做求绝对值代码不要太长 辗转相减法求最大公约数的vb代码 在vb中怎么求三角函数值 代码编写 求一定范围内服从正态分布的随机数VB代码? 怎样求素数(文字说明)不要用代码 语言语言叙述 另附vb代码 并详解 求将数据组显示出的Vb代码,数据组如 74 98 26 99 3012 38 45 51 22 15 83 09 72 66 100到999的水仙花数是多少请问用VB语言写出求100到999的水仙花数的代码是什么` VB中已知圆的半径求圆的周长和面积,求代码 求一个vb代码,关于判断一个整数的奇偶性在文本框中输入一个整数,判断该数的奇偶性,将结果显示在标签中.需要完整的代码 已知两点坐标,在vb中怎样计算两点连线与水平线的角度?求公式代码我需要在VB中的代码啊 求写vb代码,要求:在100~200之间的数中找出同时满足除3余2,除5余3和除7...求写vb代码,要求:在100~200之间的数中找出同时满足除3余2,除5余3和除7余2的所有整数! 求1-1000的素数统计 统计素数的个数 vb.net代码 求有数字按键的简单vb计算器代码,插入到哪才能用呢 设计个vb 计算三角形面积,格式如下、、、、、求代码= =不是面积公式、、、、、、、、