新微赢技术网

标题: [求助]如何把这代码封装为一个函数 [打印本页]

作者: 欧阳风    时间: 2010-1-8 00:53
标题: [求助]如何把这代码封装为一个函数
num = rs("sss")
min = int(num/60)
sec = num mod 60
if len(sec)=1 then sec="0"&sec

我要在表格里面输出的是
<%=min&":"&sec%>

由于我在多个地方都用到这段代码,
所以想把它封装成一个函数,
不知道如何操作.
作者: 風雲々無心メ    时间: 2010-1-8 00:53
可以把要返回的值给了函数名,这样就可以在调函数的时候有返回值了
作者: 云飞    时间: 2010-1-8 00:53
楼上的方法是正确的!
作者: 快乐小猪    时间: 2010-1-8 00:53
function ch(num)
min = int(num/60)
sec = num mod 60
if len(sec)=1 then
sec="0"&sec
end if
ch=sec
end function

调用

<%=ch(rs("sss"))%>


看看这个可以不?
作者: o.筎茈菰箪き    时间: 2010-1-8 00:53
function 函数名
函数体
end function
作者: 梦缘o☆无恒    时间: 2010-1-8 00:53
不明白呀。。。。
作者: ('葒諺禍氺    时间: 2010-1-8 00:53
function ch(num)
min = int(num/60)
sec = num mod 60
if len(sec)=1 then
sec="0"&sec
end if
ch=sec
end function

调用

<%=ch(rs("sss"))%>

这个函数似乎忽略了min这个变量喔...
应该是这样:

function ch(num)
min = int(num/60)
sec = num mod 60
if len(sec)=1 then
sec="0"&sec
end if
ch=min&":"&sec
end function

谢谢你给我帮忙




欢迎光临 新微赢技术网 (http://bbs.weiying.cn/) Powered by Discuz! X3.2