BAsit Bir toplama Sorusu

[karani]

Arkadaşlar sadece toplama yapabilen bir hesap makinesi yapayım dedim kodları yazdım ama çalışmıyor.

Ekrana 0123456789.+=C butonlarını koydum. Bir tanede text koydum.

Butonlardan rakamların içlerinde ki kodlar şöyle
taxt1.text= text1.text+"1(yani sayısına göçre değişir.)"

oralarda sıkıntı yok asıl sıkıntı + ve = butonlarıda.

İki tanede değişken atadım form load da tanımladım.
dim birincisayi as single
dim iklincisayi as single diye.

+ nın içinde ki kodlar
if tex1.text<>"" then
birincisayi=val(text1.text)
text1.text=""
end if



= in içinde kod
if tex1.text<>"" then
ikincisayi=val(text1.text)
text1.text= birincisayi + ikincisayi
end if

[karani]

Arkadaşlar cevabını buldum değişkenleri form load kısmına değilde bağımsız olarak formun en üst kısmına tanımlıyoruz.