程序

VBScript 可使用两种程序：

子程序
函数程序

VBScript 子程序

子程序是将一段具有某种特定功能的语句区块单句撰写成一个独立的程序，给予特定的名称。

子程序：

是一系列的语句，被封装在 Sub 和 End Sub 语句内
可执行某些操作，但不会返回值
可带有参数

 Sub mysub()
 some statements
 End Sub

或者

 Sub mysub(argument1,argument2)
 some statements
 End Sub

实例（仅适用于 IE）

<!DOCTYPE html>
<html>
<body>

<script type="text/vbscript">
Sub mysub()
  document.write("I was written by a sub procedure")
End Sub
document.write("I was written by the script<br>")
Call mysub()
</script>

</body>
</html>

VBScript 函数程序

函数程序：

是一系列的语句，被封装在 Function 和 End Function 语句内
可执行某些操作，并会返回值
可带有通过程序调用来向其传递的参数。
如果没有参数，必须带有空的圆括号 ()
通过向函数程序名赋值的方式，可使其返回值

 Function myfunction()
 some statements
 myfunction=some value
 End Function

或者

 Function myfunction(argument1,argument2)
 some statements
 myfunction=some value
 End Function

实例（仅适用于 IE）

function myfunction()
myfunction=Date()
end function

调用程序

这个简单的函数程序被调用来计算两个参数的和：

实例（仅适用于 IE）

Function myfunction(a,b)
myfunction=a+b
End Function

document.write(myfunction(5,9))

函数 "myfunction" 将返回参数 "a" 和参数 "b" 的和。这里返回的是 14。

当您调用程序时，您可以使用 Call 语句，如下所示：

 Call MyProc(argument)

或者，您可以省略 Call 语句，如下所示：

 MyProc argument

程序

程序

VBScript 子程序

实例（仅适用于 IE）

VBScript 函数程序

实例（仅适用于 IE）

调用程序

实例（仅适用于 IE）

选择支付方式：