Bagikan melalui


Cara: Membuat Prosedur yang Mengembalikan Nilai (Visual Basic)

Anda menggunakan Function prosedur untuk mengembalikan nilai ke kode panggilan.

Untuk membuat prosedur yang mengembalikan nilai

  1. Di luar prosedur lain, gunakan Function pernyataan, diikuti oleh End Function pernyataan.

  2. Dalam pernyataan Function, ikuti kata kunci Function dengan nama prosedur, kemudian cantumkan daftar parameter dalam tanda kurung.

  3. Ikuti tanda kurung dengan As klausul untuk menentukan jenis data dari nilai yang dikembalikan.

  4. Tempatkan pernyataan kode prosedur antara Function dan End Function pernyataan.

  5. Return Gunakan pernyataan untuk mengembalikan nilai ke kode panggilan.

    Prosedur berikut Function menghitung sisi terpanjang, atau hipotenis, dari segitiga kanan, mengingat nilai untuk dua sisi lainnya.

    Function Hypotenuse(side1 As Double, side2 As Double) As Double
        Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
    End Function
    

    Contoh berikut menunjukkan panggilan biasa ke hypotenuse.

    Dim testLength, testHypotenuse As Double
    testHypotenuse = Hypotenuse(testLength, 10.7)
    

Lihat juga