Visual Basic For Döngüsü İki Sayı Arasındaki Sayıların Toplamı

Bu örneğimizde visual basic programında for döngüsünü kullanarak klavyeden girilen iki sayı arasında bulunan sayıların toplamını hesaplayıp sonucu ekranda gösteren programı yapacağız.

Öncelikle iki tane textbox kutusuna kullanıcıdan birer sayı girmesini istiyoruz. Daha sonra bir for döngüsü ile ilk sayıdan son sayıya kadar olan sayıları teker teker alarak bir toplam değişkeninde tutuyoruz. Son olarak toplam değişkeninde bulunan sayıyı ekrana yazdırıyoruz.

Programın ekran görüntüleri:

Programın Visual Basic kodları:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        'www.bilisimkonulari.com
        Dim sayac, toplam As Integer
        toplam = 0

        For sayac = TxtBaslangic.Text To TxtBitis.Text
            toplam = toplam + sayac
        Next

        Label4.Text = toplam

    End Sub
End Class

Program dosyalarını buradan indirebilirsiniz.