Visual Basic Hesap Makinası

VB de hesap makinesi kodları;

forma 1 textbox ve 17 tane button ekleyin

formun basında 3 tane değişken atıyoruz

dim a as string

dim b,c as long

değişkenler kısa olması için a.b.c diye yazdım isterseniz değiştirebilirsiniz

buttonların textlerine 0 den 9 kadar sayıları yazın ve bir tanesine 00 yazın

kalan buttonların textlerine + , - , * , / , C , = yazın

üzerinde sayı olan buttonlara

textbox1.text = textbox1.text & "buttonun üzerinde yazan sayı"

şimdi buttonlar yazı yazabiliyor

şimdi işlem yaptıralım

+ buttonunun içine; (aşağıdaki kodları yapıştırabilirsiniz)

a = "+"

if textbox1.text = "" then 'bir sayı yazmadan butona tıklanırsa hata vermez ilk sayı 0 olarak algılar

b = 0

else

b = textbox1.text

end if

textbox1.clear()

aynılarını - , * ve / buttonlarının click olaylarınada yapıştırın ama + hangi buttonun click olayına yazıyorsanız onu yazın

C buttonunun click olayına;

textbox1.clear()

ve son olarak = buttonunun click olayına;

if textbox1.text = "" then

c = 0

else

c = textbox1.text

end if

if a = "+" then textbox1.text =c + b

if a = "-" then textbox1.text = b - c

if a = "*" then textbox1.text =c * b

if a = "/" then textbox1.text =b / c

Kodlar Bukadar Başarılar