asp数字或者字符排序函数代码
来源:asp之家 时间:2011-02-24 11:00:00
代码如下:
'排序
Function Sort1(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
Sort1 = ary
End Function
Dim arr
arr = Array("a","c","b")
arr = Sort1(arr)
For i=0 to ubound(arr)
Response.Write(arr(i)&"<br />")
Next
标签:数字,字符排序
0
投稿
猜你喜欢
关于python pygame游戏进行声音添加的技巧
2023-06-25 16:12:30
深入透析样式表滤镜(上)
2011-06-14 09:48:40
详解oracle mysql 中的“不等于“ <> != ^= is not
2024-01-25 03:35:08
利用JavaScript实现拖拽改变元素大小
2024-06-10 12:00:05
PyQt5+QtChart绘制散点图
2023-02-27 01:50:43
golang监听文件变化的实例
2024-05-08 10:24:34
Python生产者与消费者模型中的优势介绍
2023-06-18 01:21:17
jsonpath做接口封装使用技巧
2024-04-18 09:52:01
解析Python中的__getitem__专有方法
2023-10-17 13:40:19
MySQL ERROR 1045 (28000) 错误的解决办法
2024-01-16 18:49:06
php使用pack处理二进制文件的方法
2023-11-21 04:26:11
基于存储过程的详细介绍
2024-01-21 06:29:19
MySQL实现配置主从复制项目实践
2024-01-15 16:54:20
学习Python需要哪些工具
2023-06-20 17:48:40
mysql 安全管理详情
2024-01-18 05:58:00
django数据库迁移migration实现
2024-01-12 19:29:43
解决pytorch 交叉熵损失输出为负数的问题
2022-04-29 10:17:33
在Django中创建动态视图的教程
2021-09-25 09:17:28
python使用wxpython开发简单记事本的方法
2022-05-15 18:06:12
Python获取运行目录与当前脚本目录的方法
2023-12-19 13:17:59