万年历 诗书乐园
 
本站首页 音乐欣赏 古代书法 山人书法 ASP技术 会员中心 网址大全
狗年
栏目导航 首页>>ASP技术>>ASP资料
首页 作者 管理员  发表时间 2012-4-10 19:22:11 总浏览次数 1383 回到上页
 
[转帖]一个求最大值与最小值的函数
 

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")



回到上页

 
关于我们 联系我们
Copyright © 诗书乐园 All Rights Reserved
地址 广东佛山  Email pcmusic1000@163.com
ICP备案序号:粤ICP备10230805号-1