- Katılım
- 5 Ocak 2014
- Mesajlar
- 3,333
- Tepkime puanı
- 6
- Puanları
- 136
Bu vermiş oldupum kodlarla Visual Basic ile girilen herhangi bir sayının faktöriyelini alabilirsiniz. Burada yaptığımız tek işlem döngü kurmak. İsterseniz bu sayı girişini Inputbox'larla da yapabilirsiniz.
Private Sub Command1_Click()
sayi = Text1.Text
sonuc = 1
For i = sayi To 1 Step -1
sonuc = sonuc * i
Next
Text2.Text = sonuc
End Sub
Private Sub Command1_Click()
sayi = Text1.Text
sonuc = 1
For i = sayi To 1 Step -1
sonuc = sonuc * i
Next
Text2.Text = sonuc
End Sub