Function 过程与Sub 过程非常相似,只有关键的一点区别:Function 过程有返回值。
1. Function 过程的定义
语法格式:
[Public|Private] Function name [(形参表)]
[statements
[name=expression
[Exit Function]
[statements
[name=expression
End Function
说明:expression 为Function 过程的返回值,其他参数同Sub 过程。
2. Function 过程的调用
Function 过程的调用比较简单,可以像使用VBScript内部函数一样来调用Function过程,即在表达式中写上它的名字。还可以像调用Sub 过程那样调用Function 过程。
【例3.12】编写一个HTML页面,允许用户在一个文本框中输入一个整数N,当单击按钮时在第二个文本框中显示出1到N的总和,运行结果如图3-12所示。
文件命名为3-12.htm的代码如下:
〈HTML〉
〈HEAD〉
〈TITLE〉FUNCTION过程应用示例〈/TITLE〉
〈SCRIPT LANGUAGE=″VBScript ″〉
Function sum(x)
dim i,s
for i=1 to x
s=s+i(www.xing528.com)
next
sum=s
end Function
Sub btnshow onclick ()
dim a,b
图3-12 Function过程应用示例运行结果
a=clng (forml .textl .value)
b=sum(a)
forml .text2.value=b
end Sub
〈/SCRIPT〉
〈/HEAD〉
〈BODY〉
〈FORM name=″forml″〉
〈p〉请输入一个整数N:〈INPUT type=″text″name=″textl″size=″10″〉
〈/p〉
〈p〉计算1到N的总和:〈INPUT type=″text″name=″text2″size=″10″〉
〈/p〉
〈p〉〈INPUT type=″button″name=″btnshow″value=″显示结果″〉
〈/FORM〉
〈/BODY〉
〈/HTMI〉
免责声明:以上内容源自网络,版权归原作者所有,如有侵犯您的原创版权请告知,我们将尽快删除相关内容。