Optional (Visual Basic)
指定當呼叫程序時，可以省略程序引數。
備註
每個選擇性參數，您必須指定為該參數的預設值的常數運算式。如果運算式計算為不，預設值的數值資料型別作為參數的預設值。
如果參數清單包含選擇性的參數，其後的每一個參數必須是選擇性的。
Optional 修飾詞可用於以下內容中：
.gif "注意事項") 注意事項 |
|---|
在呼叫的程序，不論有選擇性參數，您可以依位置或名稱傳遞引數。如需詳細資訊，請參閱 依位置和名稱傳遞引數 (Visual Basic)。 |
| 注意事項 |
|---|
您也可以使用多載，以定義選擇性參數的程序。如果您有一個選擇性參數，您可以定義兩個多載的版本的程序，一個接受參數，另一個則不會。如需詳細資訊，請參閱 程序多載化 (Visual Basic)。 |
範例
下列範例會定義具有選擇性參數的程序。
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
下列範例會示範如何依位置傳遞引數，並依名稱傳遞引數呼叫程序。程序有兩個選擇性參數。
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