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

34 Okunma VBA

"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
Dizi Çarpım Array Toplam Sayı VBA

İlginizi Çekebilir

VBA Sayıların Geometrik Ortalamasını Bulma Örneği

VBA 1 İle 100 Arasında 3'e Bölünebilenleri Bulma Örneği

VBA Bir Sayının Tek Mi Çift Mi Olduğunu Göstermek

VBA Dosya Silme

VBA Bir Sayının Rakamlarının Toplamını Bulma Örneği