调用子过程或函数过程时,可以按其在过程定义中出现的确切顺序提供参数,也可以按名称在任意位置提供参数。 为了说明这一点,我将使用一个名为fCalculateInterest()的虚拟函数,该函数接受3个参数(货币,单身和长整数)并返回类型为Currency的值。
Public Function fCalculateInterest(curPrincipal As Currency, sngRate As Single, lngTermInMonths As Long) As Currency
fCalculateInterest = curPrincipal * sngRate * lngTermInMonths
End Function
对该函数的简单调用为:
Dim curInterest As Currency
curInterest = fCalculateInterest(100000,.0725, 240)
通过在正确的位置提供其参数(每个位置由逗号分隔)来调用上述函数。
如果参数的位置发生变化,则可能会出现“数据类型不匹配错误”或错误的结果。
通过使用命名参数,您可以按名称提供参数,而无需考虑位置。
命名参数由参数名称,后跟冒号和等号(:=)组成。
我们现在将调用相同的函数,但是这次将参数的位置颠倒了:
Dim curInterest As Curremcy
curInterest = fCalculateInterest(lngTermInMonths:=240, sngRate:=.0725, curPrincipal:=100000)
当您调用具有可选参数的过程时,命名参数非常有用。
如果使用命名参数,则不必包括逗号来表示缺少的位置参数,如果不使用它们,则必须使用逗号。
下面的子过程将说明我的观点,它接受4个参数,其中3个是可选的(字符串,长整数,布尔值)。
Private Sub TestArgs(Arg1 As Integer, Optional Arg2 As String, Optional Arg3 As Long, Optional Arg4 As Boolean)
End Sub
对该子过程的典型调用如下:
Call TestArgs(1234, "Argument2", 999999, False)
如果要在不传递第二和第三可选参数且不使用命名参数的情况下调用TestArgs,则语法为:
Call TestArgs(1234,,,False)
如果要在不传递第二和第三可选参数的情况下调用TestArgs,并使用命名参数,而不考虑参数的位置,则语法为:
Call TestArgs(Arg4:=False, Arg1:=1234)
注意:作为一个更现实和实际的示例,并且正如玛丽建议的那样,我提供了一个使用流行的SendObject()方法的示例。
使用此方法的所有参数,但[TemplateFile]除外,并且修改了它们在该方法中的标准位置。
这只能通过使用本周技巧“命名参数”来实现:
DoCmd.SendObject OutputFormat:=acFormatXLS, ObjectName:="tblEmployeePFD", _
ObjectType:=acSendTable, Subject:="Named Arguments", Bcc:="Joe Dunn", _
To:="Tom Jones", CC:="Chris Myers", EditMessage:=False, _ MessageText:="Demonstration of the Usage of Named Arguments"
故事的士气是:使用命名参数非常有优势,尤其是在使用可选参数时。
From: https://bytes.com/topic/access/insights/732414-how-use-named-arguments