VBA Bir Sayının Faktöriyelini Bulma Örneği

222 Okunma VBA

"VBA" Programlama dilinde "Bir Sayının Faktöriyelini Bulma Örneği" ile ilgili örnek kod aşağıda belirtilmiştir. 

Public Function Faktoriyel(ByVal n As Integer) As Integer
    If n = 1 Then
        Faktoriyel = 1
    Else
        Faktoriyel = n * Faktoriyel(n - 1)
    End If
End Function

Sub Main()
    Dim a As Integer
    a = InputBox("Bir tamsayı giriniz: ")
    Dim sonuc As Integer
    sonuc = Faktoriyel(a)
    MsgBox (a & " sayısının faktöriyeli: " & sonuc)
End Sub
Sayı Örnek Faktöriyel Matematik Çarpım VBA

İlginizi Çekebilir

VBA Bir Stringten İlk N Karakteri Kaldırma Örneği

VBA Bir Stringin Ortadaki Üç Karakterini Bulma Örneği

VBA Bir Dizi Tam Sayının Ortalamasını Bulma

VBA Bir Stringin Küçük Harfe Çevrilmesi

VBA Bugünün Tarihini Getirmek