Basit hesap makinesi yapımı örnek (Visual Basic örnek) VB 6.0
Visual Basic de basit bir hesap makinesi yapımı.
Programımızın ön yüzü yukarıdaki gibi olacak
Şimdi teker teker butonlara neler yazılacağını anlatacam ama burda bir ayrıntıda herhangi bir butona bastığın zaman text1 ile text2 arasındaki labele o işlemin işareti gelecek örneğin; topla butonuna bastığım zaman iki sayıyı toplayacak ve aynı anda labele “+” işareti koyacak.
Topla butonuna yazılacak kodlar;
Text3.Text = Val(Text1.Text) + Val(Text2.Text) Label1.Caption = "+"
Çarp butonuna yazılacak kodlar ;
Text3.Text = Val(Text1.Text) * Val(Text2.Text) Label1.Caption = "*"
Çıkar butonuna yazılacak kodlar;
Text3.Text = Val(Text1.Text) - Val(Text2.Text) Label1.Caption = "-"
Böl butonuna yazılacak kodlar;
Text3.Text = Val(Text1.Text) / Val(Text2.Text) Label1.Caption = "/"
Karekök butonu ise text3 içindeki sayının karekökünü alıp yine text3 e yazdıracak.
Karekök butonuna yazılacak kodlar;
Text3.Text = Sqr(Val(Text3.Text))
Selam kardeş ben VB ye yeni başladım fakat şoyle bir şey yapmak istiyorum yapabilirmisin yapmak istediğim programı bu sitenin formatı uygun olmadığı için yada ben bilmediğim için başka bir siteye konu açmıştım resimli oradan bi bakıp yapabilirmisin .
Dediğin yere baktım ama resimde çok karışık olmuş indirme linki de çalışmıyor onu biraz daha ayrıntılı anlatabilirsen iyi olur
kardeşim ben o labele yani +.-./.* v.s koymayı nasıl yapabilirim yardımcı olurmusun
ya yapıyoruz ama hata veri yo doğru bişeyler yazın olmuyo böle::(
kodlarda hata yok.vb 6 da yaptığına dikkat et.zaten yapılan programlar çalıştırıldıktan sonra yayınlanıyor.
zaten cevap ta var. Label1.Caption=”+” labele + eklemek için.
kodlarını yazmadan deneyin bazı arkaqdaşlarda çalışmamasının sebebi bu olabilir kodun üstünde ve altında yazısını es geçin
” ” yazısını eklemeyin
arkadaşlar acil yardım edin dönem ödevim “devamsızlık çizelgesi hazırlama” ama ben yapamıyorum yardımlarınızı bekliyorum şimdiden teşekkürler
meraba arkadaşlar bana visual basic te iki sayının ebob ve ekok unu bulan program lazım yardım edersenız sevınırım lütfen…:((
bu komutlardan önce ve sonra ne yazcaz giriş kısmında vs
Öncelikle nesneleri Toolbox’dan forma ekliyoruz.(3 tane textbox,4 tane label,5 tane Commandbutton) Butonları çift tıklayarak click olaylarına yukarıdaki kodları yazdıktan sonra çalıştırıyoruz.(Kısayol tuşu F5)
Ellerinize sağlık
hesap makinesinde küp,kare alma yapımlarını istiyorum
flash tan hesap makinesi yaptım ama küp karekökü vs olmuyor yardım edermisiniz
Küpkök , karekök için vb 6.0 örneği için link : http://www.gorselprogramlama.com/karekok-ve-kupkok-hesaplama-vb-60
flash as2 için link :
http://www.gorselprogramlama.com/karekok-ve-kupkok-hesaplama-flash-as2
string tc, anne, vergi;
tc = textBox1.Text;
anne = textBox2.Text;
vergi = textBox3.Text;
if ((tc == “”) || (anne == “”) || (vergi == “”))
{
try
{
throw new Exception();
}
catch (Exception)
{
MessageBox.Show(“bilgilerin tamamını girmelisiniz.”);
}
}
else
{
MessageBox.Show(“bilgiler tam girildi”);
} bu kodda sürekli bi hatyla karşilaşiorum yardım ederseniz sevinirim.
kodlarda bir hata yok. projene 3 text ekle. Tabi isimlerini değiştirme. Eklediğin texlerde nameler mi farklı acaba. Kontrol et. namelerin textBox1 , textBox2 , textBox3 olmalı. Zaten bu kodlar nesne tabanlı programlama dersinin 4 modülünde var.Sende ordan yapmaya çalışmıssın galiba.Ben senin için çalışan formu kodlarıyla birlikte yukarıya try örneği linki olarak ekledim. Alınca haber veririsen linki oradan kaldırırız. Kolay gelsin.
teşşekkur ederim hatamı buldum
sayenizde
rica ederim.Her zaman elimizden geldiğince .