Mencari Nilai Deret Faktorial Menggunakan VB

Dalam matematika, faktorial dari bilangan asli  n adalah hasil perkalian antara bilangan bulat positif yang kurang dari atau sama dengan n. Faktorial ditulis sebagai n! dan disebut n faktorial. Sebagai contoh, 5! adalah bernilai  5×4×3×2×1 =120

fungsi faktorial didefenisikan sebagai berikut :

berikut adalah langkah-langkah membuat program faktorial menggunakan visual basic editor :

buat box pada kolom userform seperti dibawah ini :

klik 2 kali pada commandbutton lalu tuliskan program seperti di bawah in :

Private Sub commandbutton_Click()
'Program menghitung deret faktorial
'Irawan Sentosa

Dim a, hasil As Double
hasil = Val(textbox1.Text)
For a = Val(textbox1.Text) - 1 To 1 Step -1
Deret.AddItem hasil
Deret.AddItem a

hasil = hasil * a
textbox2.Text = hasil

Next

If hasil < 0 Then
MsgBox "tidak ada faktorial negatif"
ElseIf hasil = 0 Then
MsgBox "hasil faktorial adalah 1"
ElseIf hasil = 1 Then
MsgBox "hasil faktorial adalah 1"
End If

End Sub

run program dengan menekan tombol f5 pada keyboardkomputer

hasilnya seperti dibawah ini : 

semoga bermanfaat