Visual Basic Bir Sayının Rakamlarının Toplamını Bulma Örneği

"Visual Basic" Programlama dilinde "Bir Sayının Rakamlarının Toplamını Bulma Örneği" ile ilgili kod örneği aşağıda belirtilmiştir.

Imports System

Module MainModule
    Sub Main()
        Dim sum As Integer = 0
        Console.WriteLine("Bir Sayı Girin: ")
        Dim number As Integer = Integer.Parse(Console.ReadLine())
        
        While number <> 0
            Dim digit As Integer = number Mod 10
            sum = sum + digit
            number = number \ 10
        End While
        
        Console.WriteLine("Rakamların Toplamı: " & sum)
    End Sub
End Module



İlginizi Çekebilir

Visual Basic Bir Stringdeki Her Karakterin Sayısını Bulma Örneği

Visual Basic Tarihe Yıl Ekleme Veya Çıkarma

Visual Basic Dictionary'deki Değerler İle Listenin Elemanlarını E ...

Visual Basic Tarihe Saniye Ekleme Veya Çıkarma

Visual Basic Tarihe Saat Ekleme Veya Çıkarma