复制代码 代码如下:arr = array(12,52,14,43,24,58,15,64,24,57,17,56,45) arrLen = ubound(arr) for i=0 to arrLen-1 for j = 0 to (arrlen -1)-i if arr(j)>arr(j+1) then temp = arr(j) arr(j)= arr(j+1) arr(j+1) = temp end if next next for each l in arr response.Write l&"<br>" next

　　推荐阅读

　　asp DateDiff实现文字在特定时间后消失

DateDiff(timeinterval,date1,date2 [, firstdayofweek [, firstweekofyear]]) // timeinterval 表示相隔时间的类型，代码为： 　　yyyy 年 　　q 季 　　m 月 　　y 一年的日数 　　d 日 　　w 一周的日数 　　ww>>>详细阅读

本文标题：asp 实现的冒泡排序程序

地址：http://www.17bianji.com/kaifa2/ASP/32009.html

 1/2    1