Nasıl yapılır: Değer Döndüren Bir Yordam Oluşturma (Visual Basic)

Çağıran koda bir değer döndürmek için bir yordam kullanırsınız Function .

Değer döndüren bir yordam oluşturmak için

  1. Diğer yordamların dışında deyimini Function ve ardından deyimini End Function kullanın.

  2. deyiminde Function , yordamın Function adıyla anahtar sözcüğünü ve ardından parametre listesini parantez içinde izleyin.

  3. Döndürülen değerin veri türünü belirtmek için yan As tümcesiyle parantezleri izleyin.

  4. yordamın kod deyimlerini ve End Function deyimleri arasına Function yerleştirin.

  5. Değerini çağıran koda döndürmek için deyimini Return kullanın.

    Aşağıdaki Function yordam, diğer iki kenarın değerleri göz önüne alındığında sağ üçgenin en uzun tarafını veya hipotenüsünü hesaplar.

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

    Aşağıdaki örnekte tipik bir çağrısı hypotenusegösterilmektedir.

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

Ayrıca bkz.