如何：呼叫多載程序 (Visual Basic)

  • 發行項

多載程序的優點是呼叫的彈性。 不論呼叫程式碼傳遞的引數為何，其都可以取得自身傳遞至程序所需的資訊，然後呼叫單一程序名稱。

呼叫已定義多個版本的程序

  1. 在呼叫程式碼中，判斷要傳遞至程序的資料。

  2. 以正常方式撰寫程序呼叫，在引數清單中呈現資料。 請確定引數符合為程序定義之其中一個版本中的參數清單。

  3. 您不需要判斷要呼叫的程序版本。 Visual Basic 會將控制項傳遞至符合您引數清單的版本。

    下列範例會呼叫post操作說明：定義多個程序版本中宣告的程序。 其會取得客戶識別、判斷其為 String 或 Integer，然後在任一案例中呼叫相同的程序。

    Imports MSVB = Microsoft.VisualBasic

    Dim customer As String
Dim accountNum As Integer
Dim amount As Single
customer = MSVB.Interaction.InputBox("Enter customer name or number")
amount = MSVB.Interaction.InputBox("Enter transaction amount")
Try
    accountNum = CInt(customer)
    Call post(accountNum, amount)
Catch
    Call post(customer, amount)
End Try

另請參閱