一个求最大值与最小值的函数
2018-09-05 23:40
阅读：912
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)
上一篇：如何查询日期类型的数据？
下一篇：数组数据排序的程序例子
评论
亲，登录后才可以留言！