设为首页收藏本站

新微赢技术网

 找回密码
 注册
搜索
热搜: 回贴
查看: 61|回复: 7
打印 上一主题 下一主题

[求助]如何把这代码封装为一个函数

[复制链接]
跳转到指定楼层
1#
发表于 2010-1-8 00:53:10 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
num = rs("sss")
min = int(num/60)
sec = num mod 60
if len(sec)=1 then sec="0"&sec

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

由于我在多个地方都用到这段代码,
所以想把它封装成一个函数,
不知道如何操作.
2#
发表于 2010-1-8 00:53:13 | 只看该作者
可以把要返回的值给了函数名,这样就可以在调函数的时候有返回值了
回复 支持 反对

使用道具 举报

3#
发表于 2010-1-8 00:53:17 | 只看该作者
楼上的方法是正确的!
回复 支持 反对

使用道具 举报

4#
发表于 2010-1-8 00:53:19 | 只看该作者
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"))%>


看看这个可以不?
回复 支持 反对

使用道具 举报

5#
发表于 2010-1-8 00:53:22 | 只看该作者
function 函数名
函数体
end function
回复 支持 反对

使用道具 举报

6#
发表于 2010-1-8 00:53:25 | 只看该作者
不明白呀。。。。
回复 支持 反对

使用道具 举报

7#
发表于 2010-1-8 00:53:28 | 只看该作者
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

谢谢你给我帮忙
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

申请友链|小黑屋|最新主题|手机版|新微赢技术网 ( 苏ICP备08020429号 )  

GMT+8, 2024-11-20 07:31 , Processed in 0.116283 second(s), 8 queries , Gzip On, Memcache On.

Powered by xuexi

© 2001-2013 HaiAn.Com.Cn Inc. 寰耽

快速回复 返回顶部 返回列表