Klavyeden girilen iki sayı arasındaki sayıların toplamı VB 6.0
Klavyeden girilen iki sayı arasındaki sayıların toplamı VB 6.0
[Code='VB.NET']Private Sub Command1_Click()
Dim a, sayi1, sayi2 As Integer
Dim toplam As Single
sayi1 = InputBox(“Başlangıç değerini giriniz”)
sayi2 = InputBox(“Bitiş değerini giriniz”)
toplam = 0
For a = sayi1 To sayi2
toplam = toplam + a
Next
MsgBox (“sayıların toplamı=” & toplam)
End Sub[/Code]
Rica: Sitemizin Google'da Ön Sıralarda Çıkması İçin Lütfen Alttaki Google+ Butonuna Tıklayınız , Sayfamızı Facebookta Beğeniniz veya yazıları Twitter,Facebookta paylaşınız.
Son Yorumlar