Merhaba Arkadaşlar bugun sizlere Girilen sayıların Tek ve Cift Toplamı Programının Kodlarını Vereceğim



Programın Son Hali;




Program İcin Gereken Şeyler;
8 label , 1 button , 2 textbox



Button 1 Yazılacaklar;






PHP Code:
Dimtoplam, tektoplam, cifttoplam AsSingle


PHP Code:
Dim a, altsınır, ustsınır As Integer
altsınır = Val(TextBox1.Text)
ustsınır = Val(TextBox2.Text)

For a = altsınır To ustsınır
If a Mod 2 = 1 Then tektoplam = tektoplam + a
If a Mod 2 = 0 Then cifttoplam = cifttoplam + a
toplam = toplam + a
Next
Label6.Text = tektoplam
Label7.Text = cifttoplam
Label8.Text = toplam



__________________