VBA Bir Dizi Gerçek Sayının Çarpımını Bulma Örneği

"VBA" Programlama dilinde "Bir Dizi Gerçek Sayının Çarpımını Bulma Örneği" ile ilgili kod örneği aşağıda gösterilmiştir.

Sub Main()
    Dim count As Integer
    Dim i As Integer
    Dim product As Single
    count = InputBox("Gerçek Sayı Adeti Girin: ")
    product = 1.0
    For i = 1 To count
        x = InputBox("Gerçek Sayı Girin: ")
        product = product * x
    Next i
    MsgBox "Toplam: " & product
End Sub



İlginizi Çekebilir

VBA Dizideki Herhangi Bir Konuma Eleman Ekleme Örneği

VBA Rastgele Sayılardan En Büyük ve En Küçüğü Bulma Örneği

VBA Tüm Kolonları Auto Fit Yapmak

VBA Bir Dizideki Tek Sayıların Adetini Bulma Örneği

VBA Sinüs Değerini Hesaplama