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

206 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 Aktif Olan Dışındaki Tüm Worksheet'leri Gizlemek

VBA Döngü İle Bir Dizideki En Büyük Sayıyı Bulma Örneği

VBA Bugünün Tarihini Getirmek

VBA Yarıçap Girilen Bir Dairenin Çevre ve Alanını Bulma Örneği

VBA Dosya Taşıma