Posted by : Unknown


Dalam pemrograman kita sering temui istilah Function dan Procedure yang biasanya berisi kumpulan statement  code tertentu. kedua mempunyai kegunaan yang hampir sama yaitu memudahkan kita agar tidak menuliskan program berulang-ulang pada saat mendesain program. Misalkan kita ingin membuat kode program yang sama namun mempunyai tujuan yang berbeda maka kita bisa mencoba menggunakan function dan procedure dalam kodingan kita. 
perbedaan dari keduanya yaitu jika prosedur tidak mengrimkan nilai balik, sementara function akan mengirimkan nilai balik.

contoh statement prosedur :
Sub displaymessage()
        MsgBox)("hellow from display message prosedur")
End Sub

memanggil prosedur 
displaymessage() 

contoh statement Function :
Function calculateSalePrice(ByVal decRetail As Decimal,
                                ByVal decPercentage As Decimal) As Decimal

        'calculate and return the sale priice
        Dim hasil As Decimal

        hasil = decRetail - (decRetail * decPercentage / 100)
        Return hasil         '<---function mengembalikan nilai (output) dalam variable hasil)

 End Function

memanggil function
decSalePrice = calculateSalePrice(decRetail, decPercentage)

dalam prosedur atau pun fungction kita bisa memasukan parameter ByVal / ByRef. Parameter nyata yang dikirim secara Nilai (By Value atau ByVal) ke dalam sebuah prosedur, tidak menyebabkan perubahan-perubahan yang terjadi pada nilai parameter. Pada subrutin yang menggunakan parameter ByVal maka Subrutin akan memiliki salinan lokal sendiri dari variabel yang memanggil (parameter) dan proses perubahan tidak akan mengubah nilai variabel asal. 

Sementara Parameter yang dikirim secara Acuan (By Reference atau ByRef) ke dalam sebuah prosedur, menyebabkan perubahan-perubahan yang terjadi pada nilai parameter. Pada subrutin yang menggunakan parameter ByRef maka Subrutin tidak akan membuat salinan terpisah dari variabel parameter. Nilai baru yang dihasilkan subrutin akan digunakan sebagai referensi ke parameter asli.


{ 1 komentar... read them below or add one }

  1. The Four Horse Racing in the Galaxy
    In 1994, the leading racing titanium pan manufacturer titanium water bottle of cars, the titanium teeth Toto, titanium wedding band was titanium water bottle acquired by Softbuzz. Developed by the UK team of racing enthusiasts, it was known for its

    BalasHapus

note: berkomentarlah dengan baik
tidak menghina, mencaci, mnyinggung ataupun hal negatif lainya

apabila ingin berkomentar tapi tidak punya akun gunakan opsi anonymous

juga bila ada yang tidak dimengerti dan ingin ditanyakan/didiskusikan
silahkan langsung saja comment disini
^_^

- Copyright © Blog si Mas Kaca Mata - Blogger Templates - Powered by Blogger - Designed by Johanes Djogan -