Sdílet prostřednictvím


Postupy: Volání přetížené procedury (Visual Basic)

Výhodou přetížení procedury je flexibilita volání. Volající kód může získat informace, které potřebuje předat proceduře, a pak zavolat jeden název procedury, bez ohledu na to, jaké argumenty předává.

Volání procedury s více než jednou definovanou verzí

  1. Ve volajícím kódu určete, která data se mají předat do procedury.

  2. Zapište volání procedury normálním způsobem, který prezentuje data v seznamu argumentů. Ujistěte se, že argumenty odpovídají seznamu parametrů v jedné z verzí definovaných pro proceduru.

  3. Nemusíte určit, jakou verzi procedury se má volat. Visual Basic předá ovládací prvek verzi, která odpovídá seznamu argumentů.

    Následující příklad volá proceduru post deklarovanou v how to: Define Multiple Versions of a Procedure. Získá identifikaci zákazníka, určí, zda se jedná o položku String nebo o Integer, a v obou případech volá stejný postup.

    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
    

Viz také