标题:[求助]如何把这代码封装为一个函数
只看楼主
jtws3000
Rank: 1
等 级:新手上路
帖 子:102
专家分:0
注 册:2006-11-3
 问题点数:0 回复次数:6 
[求助]如何把这代码封装为一个函数

num = rs("sss")
min = int(num/60)
sec = num mod 60
if len(sec)=1 then sec="0"&sec

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

由于我在多个地方都用到这段代码,
所以想把它封装成一个函数,
不知道如何操作.
搜索更多相关主题的帖子: 函数 sec num 封装 代码 
2007-07-11 09:51
放任一切
Rank: 2
等 级:新手上路
威 望:4
帖 子:217
专家分:0
注 册:2007-3-22
得分:0 
function 函数名
函数体
end function
2007-07-11 09:53
放任一切
Rank: 2
等 级:新手上路
威 望:4
帖 子:217
专家分:0
注 册:2007-3-22
得分:0 
可以把要返回的值给了函数名,这样就可以在调函数的时候有返回值了
2007-07-11 09:55
jtws3000
Rank: 1
等 级:新手上路
帖 子:102
专家分:0
注 册:2006-11-3
得分:0 

不明白呀。。。。


请各位大侠多多指点小妹. BLOG: http://blog..cn/iexe
2007-07-11 12:54
gdk2006
Rank: 4
等 级:业余侠客
威 望:8
帖 子:928
专家分:270
注 册:2006-7-2
得分:0 
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"))%>


看看这个可以不?

[此贴子已经被作者于2007-7-11 13:00:27编辑过]


程序员的悲哀如何找女朋友?
追女解决方案百度“让她着迷”!
2007-07-11 13:00
放任一切
Rank: 2
等 级:新手上路
威 望:4
帖 子:217
专家分:0
注 册:2007-3-22
得分:0 
楼上的方法是正确的!
2007-07-11 14:21
jtws3000
Rank: 1
等 级:新手上路
帖 子:102
专家分:0
注 册:2006-11-3
得分:0 
[QUOTE]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"))%>[/QUOTE]
这个函数似乎忽略了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

谢谢你给我帮忙

[此贴子已经被作者于2007-7-11 14:42:52编辑过]


请各位大侠多多指点小妹. BLOG: http://blog..cn/iexe
2007-07-11 14:39



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-154542-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.467683 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved