当前位置: 首页 > 图文教程 > 网络编程 > ASP > 一个求最大值与最小值的函数

ASP
ASP实用大全-ASP服务器组件(4)
ASP实用大全-ASP服务器组件(5)
ASP实用大全-ASP服务器组件(6)
ASP实用大全-ASP服务器组件(7)
ASP 3.0高级编程(一)
ASP 3.0高级编程(二)
ASP 3.0高级编程(三)
ASP 3.0高级编程(四)
ASP 3.0高级编程(五)
ASP 3.0高级编程(六)
Asp Object 之:AddHeader
Asp Object 之:AppendToLog
Asp Object 之:BinaryRead
Asp Object 之:BinaryWrite
Asp Object 之:Buffer
Asp Object 之:CacheControl
Asp Object 之:Charset
Asp Object 之:Clear
Asp Object 之:ClientCertificate
Asp Object 之:ContentType

ASP 中的 一个求最大值与最小值的函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 25 ::
收藏到网摘: n/a

function max(info)
arr=split(info,",")
max=clng(arr(0))
for i=1 to ubound(arr)
if clng(arr(i))>clng(max) then
max=clng(arr(i))
end if
next
end function

function min(info)
arr=split(info,",")
min=clng(arr(0))
for i=1 to ubound(arr)
if clng(arr(i)) min=clng(arr(i))
end if
next
end function
'调用方式
'i=max("12,23,12,12,,32,43,54,43,56")
'i=min("12,12,23,3,454,34,4,5,45,3,232,3,2,43,4")