Cara untuk: Memanggil Prosedur Kelebihan Beban (Visual Basic)

Keuntungan dari kelebihan beban prosedur adalah fleksibilitas panggilan. Kode panggilan dapat memperoleh informasi yang diperlukan untuk meneruskan ke prosedur dan kemudian memanggil satu nama prosedur, terlepas dari argumen apa yang diteruskannya.

Untuk memanggil prosedur yang memiliki lebih dari satu versi yang ditentukan

  1. Dalam kode panggilan, tentukan data mana yang akan diteruskan ke prosedur.

  2. Tulis panggilan prosedur dengan cara normal, menyajikan data dalam daftar argumen. Pastikan argumen cocok dengan daftar parameter di salah satu versi yang ditentukan untuk prosedur.

  3. Anda tidak perlu menentukan versi prosedur mana yang akan dipanggil. Visual Basic meneruskan kontrol ke versi yang cocok dengan daftar argumen Anda.

    Contoh berikut memanggil prosedur post yang dideklarasikan dalam Cara untuk: Menentukan Beberapa Versi Prosedur. Ini mendapatkan identifikasi pelanggan, menentukan apakah itu adalah String atau Integer, lalu dalam kedua kasus memanggil prosedur yang sama.

    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
    

Lihat juga