更正確的asp冒泡排序
更新時(shí)間：2007年05月24日 00:00:00 作者：
網(wǎng)上搜到的代碼，千篇一律是這個(gè)
Function Sort(ary)
Dim KeepChecking,I,FirstValue,SecondValue
KeepChecking = TRUE
Do Until KeepChecking = FALSE
KeepChecking = FALSE
For I = 0 to UBound(ary)
If I = UBound(ary) Then Exit For
If ary(I) > ary(I+1) Then
FirstValue = ary(I)
SecondValue = ary(I+1)
ary(I) = SecondValue
ary(I+1) = FirstValue
KeepChecking = TRUE
End If
Next
Loop
Sort = ary
End Function
存在錯(cuò)誤。。。。。。
測(cè)試一下就知道
s="11,3,1"
s=sort(split(s,","))
for i=0 to ubound(s)
response.write s(i) & "<br>"
next
打印結(jié)果是
1
11
3
正確的function是:
function sort(ary)
ck=true
do Until ck = false
ck=false
For f = 0 to UBound(ary) -1
if clng(ary(f))>clng(ary(f+1)) then
v1=clng(ary(f))
v2=clng(ary(f+1))
ary(f)=v2
ary(f+1)=v1
ck=true
end if
next
loop
sort=ary
end function
就差在一個(gè)clng()
但好笑的是，有些數(shù)組，用那個(gè)錯(cuò)誤的sort函數(shù)是可以排正確的。
Function Sort(ary)
Dim KeepChecking,I,FirstValue,SecondValue
KeepChecking = TRUE
Do Until KeepChecking = FALSE
KeepChecking = FALSE
For I = 0 to UBound(ary)
If I = UBound(ary) Then Exit For
If ary(I) > ary(I+1) Then
FirstValue = ary(I)
SecondValue = ary(I+1)
ary(I) = SecondValue
ary(I+1) = FirstValue
KeepChecking = TRUE
End If
Next
Loop
Sort = ary
End Function
存在錯(cuò)誤。。。。。。
測(cè)試一下就知道
s="11,3,1"
s=sort(split(s,","))
for i=0 to ubound(s)
response.write s(i) & "<br>"
next
打印結(jié)果是
1
11
3
正確的function是:
function sort(ary)
ck=true
do Until ck = false
ck=false
For f = 0 to UBound(ary) -1
if clng(ary(f))>clng(ary(f+1)) then
v1=clng(ary(f))
v2=clng(ary(f+1))
ary(f)=v2
ary(f+1)=v1
ck=true
end if
next
loop
sort=ary
end function
就差在一個(gè)clng()
但好笑的是，有些數(shù)組，用那個(gè)錯(cuò)誤的sort函數(shù)是可以排正確的。
相關(guān)文章
es6函數(shù)name屬性功能與用法實(shí)例分析
這篇文章主要介紹了es6函數(shù)name屬性,結(jié)合實(shí)例形式分析了es6函數(shù)name屬性基本原理、功能、用法及操作注意事項(xiàng),需要的朋友可以參考下2020-04-04
JavaScript中的call和apply的用途以及區(qū)別
本文主要介紹了JavaScript中的call和apply的用途以及區(qū)別。具有很好的參考價(jià)值，下面跟著小編一起來(lái)看下吧2017-01-01
網(wǎng)站基于flash實(shí)現(xiàn)的Banner圖切換效果代碼
這篇文章主要介紹了網(wǎng)站基于flash實(shí)現(xiàn)的Banner圖切換效果代碼,是基于Flash與js實(shí)現(xiàn)的banner圖片自動(dòng)定時(shí)切換特效,并附有完整的示例源碼,非常具有實(shí)用價(jià)值,需要的朋友可以參考下2014-10-10
javascript使用正則控制input輸入框允許輸入的值方法大全
在做項(xiàng)目的時(shí)候，我們經(jīng)常會(huì)遇到控制input輸入框允許輸入的值為數(shù)字，字母，漢字或者混排的情況，那么我們?cè)趺磥?lái)處理呢，下面我們就來(lái)探討怎么通過(guò)用javascript正則來(lái)實(shí)現(xiàn)2014-06-06
JavaScript模運(yùn)算符理解及運(yùn)用實(shí)戰(zhàn)
這篇博客文章是為初級(jí)到中級(jí)JavaScript開發(fā)人員所寫,主要為大家介紹了JavaScript模運(yùn)算符理解及運(yùn)用實(shí)戰(zhàn)示例,有需要的朋友可以借鑒參考下,希望能夠有所幫助,祝大家多多進(jìn)步2023-11-11
一些不錯(cuò)的JS 自定義函數(shù) ，不少網(wǎng)站都在用，都是一些比較不錯(cuò)的函數(shù)，可以拿來(lái)直接使用。建議學(xué)習(xí)。2009-08-08
jQuery EasyUI window窗口使用實(shí)例代碼
本文通過(guò)實(shí)例代碼給大家介紹了jQuery EasyUI window窗口使用功能，代碼簡(jiǎn)單易懂，非常不錯(cuò)，具有參考借鑒價(jià)值,需要的朋友可以參考下2017-12-12
javascript獲得服務(wù)器端控件的ID的實(shí)現(xiàn)代碼
javascript獲得服務(wù)器端控件的ID的實(shí)現(xiàn)代碼，需要的朋友可以參考下。2011-12-12
javascript 傳統(tǒng)事件模型構(gòu)造的事件監(jiān)聽器實(shí)現(xiàn)代碼
最近做東西需要添加大量的事件，而且要對(duì)所有事件進(jìn)行比較細(xì)致的控制，于是便試著寫了個(gè)事件監(jiān)聽器。2010-05-05
使用JavaScript實(shí)現(xiàn)網(wǎng)頁(yè)秒表功能（含開始、暫停、繼續(xù)、重置功能）
這篇文章主要介紹了使用JavaScript實(shí)現(xiàn)網(wǎng)頁(yè)秒表（含開始、暫停、繼續(xù)、重置功能）,本文通過(guò)實(shí)例代碼給大家介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2020-06-06