本文通过一个具体的示例展示了如何在VBScript中定义并调用带有参数的SUB过程。示例代码中，定义了一个名为mysub的过程，该过程接受两个参数，并通过循环输出变量i的值直至达到指定的总数。文章还演示了如何直接调用过程以及使用call语句进行调用。
<
%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<title>SUB过程带参数</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<%
dim total,i
response.Write("使用过程名直接调用的结果<br>")
total=5
i=1
mysub total,i
response.Write("<br>")
response.Write("使用 call 过程名调用的结果<br>")
total=6
i=2
call mysub(total,i)
%>
<%
sub mysub(tt,ii)
while ii<=tt
response.Write("i="&i)
response.Write("<br>")
i=i+1
wend
end sub
%>
</html>
<html>
<head>
<title>SUB过程带参数</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<%
dim total,i
response.Write("使用过程名直接调用的结果<br>")
total=5
i=1
mysub total,i
response.Write("<br>")
response.Write("使用 call 过程名调用的结果<br>")
total=6
i=2
call mysub(total,i)
%>
<%
sub mysub(tt,ii)
while ii<=tt
response.Write("i="&i)
response.Write("<br>")
i=i+1
wend
end sub
%>
</html>
扫一扫
700
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
