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 Stringin Tersten Okunuşu İle Aynı Olduğunu Kontrol Eden Örnek

VBA Dizideki Bir Elemanı Döngü İle Arama Örneği

VBA 1'den N'e Kadar Asal Sayıları Bulma Örneği

VBA Dosya Boyutunu Öğrenme

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