Bagikan melalui


Cara: Memanggil Prosedur Kelebihan Beban (Visual Basic)

Keuntungan dari kelebihan beban prosedur adalah dalam fleksibilitas panggilan. Kode panggilan dapat memperoleh informasi yang perlu diteruskan ke prosedur dan kemudian memanggil satu nama prosedur, tidak peduli 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 yang post dinyatakan dalam Cara: Menentukan Beberapa Versi Prosedur. Ini mendapatkan identifikasi pelanggan, menentukan apakah itu adalah String atau Integer, dan kemudian 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