Практическое руководство. Вызов перегруженной процедуры (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

См. также