716
734
2946
超级版主
sub sub_name(参数) 子函数体 end sub
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <[email=%@LANGUAGE=]%@LANGUAGE="VBSCRIPT[/email]" CODEPAGE="65001" %> <% sub CountN(n) dim c for i = 1 to n c = c + i next response.Write("result: " & c & "<br />") end sub call CountN(5) countN 6 %> </body> </html>
result: 15 result: 21
使用道具 举报
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|Archiver|曲径通幽 ( 琼ICP备11001422号-1|公安备案:46900502000207 )
GMT+8, 2025-6-18 02:25 , Processed in 0.078815 second(s), 22 queries .
Powered by Discuz! X3.2
© 2001-2013 Comsenz Inc.