指定调用过程时可以省略过程参数。
注解
对于每个可选参数，必须将常量表达式指定为该参数的默认值。 如果表达式的计算结果为 Nothing，则值数据类型的默认值将用作参数的默认值。
如果参数列表包含可选参数，则后面的每个参数也必须是可选的。
修饰 Optional 符可用于以下上下文：
注释
使用或不使用可选参数调用过程时，可以按位置或按名称传递参数。 有关详细信息，请参阅 按位置和名称传递参数。
注释
还可以使用重载定义具有可选参数的过程。 如果你有一个可选参数，则可以定义过程的两个重载版本，一个接受该参数，一个不接受该参数。 有关详细信息，请参阅 过程重载。
示例 1
以下示例定义具有可选参数的过程。
Public Function FindMatches(ByRef values As List(Of String),
ByVal searchString As String,
Optional ByVal matchCase As Boolean = False) As List(Of String)
Dim results As IEnumerable(Of String)
If matchCase Then
results = From v In values
Where v.Contains(searchString)
Else
results = From v In values
Where UCase(v).Contains(UCase(searchString))
End If
Return results.ToList()
End Function
示例 2
以下示例演示如何使用按位置传递的参数和按名称传递的参数调用过程。 该过程有两个可选参数。
Private Sub TestParameters()
' Call the procedure with its arguments passed by position,
studentInfo("Mary", 19, #9/21/1981#)
' Omit one optional argument by holding its place with a comma.
studentInfo("Mary", , #9/21/1981#)
' Call the procedure with its arguments passed by name.
studentInfo(age:=19, birth:=#9/21/1981#, name:="Mary")
' Supply an argument by position and an argument by name.
studentInfo("Mary", birth:=#9/21/1981#)
End Sub
Private Sub studentInfo(ByVal name As String,
Optional ByVal age As Short = 0,
Optional ByVal birth As Date = #1/1/2000#)
Console.WriteLine("name: " & name)
Console.WriteLine("age: " & age)
Console.WriteLine("birth date: " & birth)
Console.WriteLine()
End Sub
