可选参数 (Visual Basic)
可以指定过程参数是可选的,并且在调用过程时不必为其提供自变量。 “可选参数”在过程定义中由关键字 指示Optional
。 下列规则适用:
过程定义中的每个可选参数都必须指定默认值。
可选参数的默认值必须是一个常数表达式。
过程定义中跟在可选参数后的每个参数也都必须是可选的。
下面的语法显示带可选参数的过程声明:
Sub name(ByVal parameter1 As datatype1, Optional ByVal parameter2 As datatype2 = defaultvalue)
调用带可选参数的过程
调用带可选参数的过程时,可以选择是否提供该自变量。 如果不提供,过程将使用为该参数声明的默认值。
当省略自变量列表中的一个或多个可选自变量时,使用连续的逗号来标记它们的位置。 下面的调用示例提供了第一个和第四个自变量,省略了第二个和第三个:
Sub name(argument 1, , , argument 4)
下面的示例对 MsgBox
函数进行多次调用。 MsgBox
有一个必需参数和两个可选参数。
对 MsgBox
的第一个调用将按照 MsgBox
定义参数的顺序提供所有三个参数。 第二个调用仅提供必选自变量。 第三个和第四个调用分别提供第一个和第三个自变量。 第三个调用按位置提供参数,第四个调用按名称提供参数。
MsgBox("Important message", MsgBoxStyle.Critical, "MsgBox Example")
MsgBox("Just display this message.")
MsgBox("Test message", , "Title bar text")
MsgBox(Title:="Title bar text", Prompt:="Test message")
确定可选自变量是否存在
过程在运行时无法检测到给定的自变量是否已被省略,或者调用代码是否已显式提供默认值。 如果需要弄清楚这一点,可以设置一个不可能的值作为默认值。 下面的过程定义了可选参数 office
并测试了其默认值 QJZ
,以查看它在调用中是否已被省略:
Sub notify(ByVal company As String, Optional ByVal office As String = "QJZ")
If office = "QJZ" Then
Debug.WriteLine("office not supplied -- using Headquarters")
office = "Headquarters"
End If
' Insert code to notify headquarters or specified office.
End Sub
如果可选参数是像 String
这样的引用类型,只要它不是该自变量所预期的值,就可以使用 Nothing
作为默认值。
可选参数和重载
定义带可选参数的过程的另一种方法是使用重载。 如果有一个可选参数,可以定义过程的两个重载版本,一个接受此参数,另一个则不带参数。 此方法随可选参数数目的增加而变得更复杂。 然而,这样做的优点是可以完全确定调用程序是否提供了每个可选自变量。