---

VBScript是一种微软公司开发的动态脚本语言，是Visual Basic的一种简化版本。在编写VBScript代码时，函数是常见的程序组件，它们用于执行特定的操作或计算，并通常返回一个结果。本文将详细介绍VBScript中定义和使用函数的方法和特性。

函数的定义和语法

VBScript中的函数定义以Function关键字开头，其语法如下：

Function functionname([parameters])
    [statements]
    [functionname = expression]
End Function

其中，functionname是函数的名称，parameters是可选的参数列表，statements表示函数要执行的一系列语句，expression是函数的返回值。在函数体内部，可以使用Local或Dim关键字声明局部变量，这些变量只能在函数内部使用。

下面是一个简单的例子，演示了如何定义和调用一个接受两个参数并返回它们之和的函数：

Function addNumbers(num1, num2)
    addNumbers = num1 + num2
End Function

要调用这个函数，只需要使用它的名称并提供参数即可：

result = addNumbers(2, 7)
MsgBox result '输出9

函数的参数

VBScript函数可以接受多个参数，并且这些参数可以是任何类型的变量、数组或对象。可以使用逗号将参数列表中的各个参数隔开。下面是一个带有三个参数的函数的例子：

Function myFunction(strValue, intValue, boolValue)
    MsgBox "The valuesare " & strValue & ", " & intValue & ", " & boolValue
End Function

myFunction "Hello", 123, True '调用该函数

这会显示一个消息框，其中包含传递给函数的三个值。

函数参数的默认值

可以使用Optional和Default关键字指定函数参数的默认值。这样，如果在调用函数时不提供该参数，就会使用默认值。例如：

Function myFunction(name, age, Optional city = "Shanghai")
    MsgBox name & " is " & age & " years old and lives in " & city
End Function

myFunction "Tom", 32 '不指定城市，使用默认值“Shanghai”
myFunction "Amy", 25, "Beijing" '指定了城市为“Beijing”

函数的返回值

函数的返回值使用函数名称加上等号的方式指定。在函数执行完毕后，返回给调用者的值将保存在变量中。下面是一个带有返回值的函数的例子：

Function multiplyNumbers(num1, num2)
    multiplyNumbers = num1 * num2
End Function

result = multiplyNumbers(3, 4)
MsgBox result '输出12

在函数体中，需要设置函数名等于返回值的表达式语句。当函数返回时，这个表达式将被计算，并将结果作为函数返回值。

函数可以被其他函数调用

VBScript中的函数还可以在其他函数内部调用。这意味着，如果程序需要更复杂的操作，可以创建多个相互调用的函数来组合处理。例如：

Function calculateDiscount(totalAmount, customerType)
    discount = 0
    If customerType = "VIP" Then
        discount = totalAmount * 0.1 'VIP客户有10%的折扣
    End If
    calculateDiscount = discount
End Function

Function calculateTotal(totalAmount, customerType)
    total = totalAmount - calculateDiscount(totalAmount, customerType)
    calculateTotal = total
End Function

MsgBox calculateTotal(100, "VIP") '应该返回90

这个例子展示了如何使用两个函数来计算订单的总金额。如果客户是VIP，那么会有10%的折扣。

总结

VBScript中的函数是一种强大的编程工具，可以帮助程序员创建可重用的代码，提高代码的复杂性和可读性。函数可以接受任意数量和类型的参数，并且可以返回任何类型的值。函数可以嵌套调用，以便创建更复杂的程序逻辑。但是，对函数的使用也需要谨慎，否则可能会影响程序的性能和可维护性。