有插入排序，选择排序，交换排序，快排，堆排，基数排序等等
你可以查“算法于数据结构”这类书中会有比较详细的介绍
VB怎样把数字按从大到小排列??急求!!!
Private Sub Command1_Click()Dim arr() '设数字存放在arr数组中，数组长度已定义好。Dim i As Integer, j As Integer, t For i = 0 To UBound(arr)For j = i + 1 To UBound(arr)If arr(j) > arr(i) Then t = arr(i)arr(i) = arr(j)arr(j) = t End If Next j Nex...
简单的VB选择法排序题,急求答案!
你可以用这样的算法：把十个数编进一个数组，然后判断数组内相邻两元素之间的大小，若前一个数大于后一个数，则不做改变;若反之，则交换两个元素的值。具体代码我就不写了吧，手机上不好打代码。反正我遇到这种东西习惯用For...next语句。
急求关于vb排序方法
有插入排序，选择排序，交换排序，快排，堆排，基数排序等等 你可以查“算法于数据结构”这类书中会有比较详细的介绍
VB用自定义函数实现给数组排序(选择法)急求!!
dim i as integer,j as integer, a(1 to 100) as integer , n as integer,tmp as integer '先给数组赋值，假设有100个数 for i=1 to 99 n=i for j=i+1 to 100 if a(j)
怎样使用VB使人名排序,
你是想对人名排序？还是想把人名对齐呀？排序的话，按拼音序？那就按首字母比较就是了。把人名对齐，可以判断名字的汉字数，＝2的，中间加空格，＝3的不处理。
急!vb 在DataGrid中如何使用上下文菜单进行升序和降序排列...
Adodc1.RecordSource = "select * from 表名 ORDER BY 字段1 desc,字段2 asc 注desc为降序，asc或是不写是升序!
...请进行名次排列并输出(考虑相同名次情况) 用VB来编程。急求啊...
程序设计思路如下：建立一个“运动员”的类；输入数据；冒泡排序；输出结果。注意：建立 [类模块]的时候，要将类 设为公共（Public）；在装载窗体时，或执行主程序（sub Main ）时，写入数据。
VB程序代码,急求啊,各位哥哥姐姐叔叔阿姨帮个忙啊,小弟谢过~_百度知 ...
for i=1 to 10 a(i)=val(text1)next i for i=1 to 10-1 for j=1 to 10-i if a(j)>a(j+1) then t=a(j):a(j)=a(j+1):a(j+1)=t next j next i print a(i)这是冒泡排序法，对于这种题目用这个方法可以的，要再根据题目稍加修改，分类就用IF语句完成，在安要求输出...
vb任意输入10个数按从小到大的顺序排序并显示排序结果在此基础上输入...
Print "排序以后的数是："For i = 1 To 10 Print a(i);Next i Print x = Val(InputBox("要找的数是："))i = 1: j = 10 Do m = (i + j) \\ 2 If a(m) = x Then MsgBox (x & " 是第 " & m & " 个数"): Exit Sub Else If x > a(m) Then i = m + 1 ...
急求一个VB发牌程序。
Private Sub Command1_Click()Randomize Val(Mid(Time$, 4, 2) + Mid(Time$, 7, 2))Dim i As Integer Dim j As Integer Dim k As Integer ' 循环变量 Dim m(4) As String ' 花色 Dim a(13, 4) As Integer 'Dim b(13, 4) As String Dim n(4) '每个人手中牌数...
