Maaş Hesaplama
Maaş Hesaplama
Basic.Net’te Maaş hesaplama programı yapalım..
Butona Yazılacak kodlar;
Dim ad, yevmiye, gun, maas, netmaas ad = InputBox("Adınız?") gun = Val(InputBox("Çalıştığınız gün sayısı?")) yevmiye = Val(InputBox("Yevmiyeniz?")) maas = yevmiye * gun MsgBox(" Sayın " &ad & " Bey maaşınız " &maas & " TL'dir. ") netmaas = maas - (maas * 20 / 100) MsgBox(" Sayın " &ad & " Bey net maaşınız " &netmaas & " TL'dir. ")