Favorilerine Ekle | Giriş Sayfan Yap | Tavsiye Et

 

Kurs Tanıtım Sayfası | Süper Üye Kimdir? | Menü Tasarımı Konulu Örnek Ders
Kod İndir| Hazır Kodlar | Makaleler| İpuçları | VB .NET Kursu | Dersler | Forum | Alt Bölümler | Servisler
    Merhaba Misafir
    anasayfa » visual basic makaleleri » hesap makinası
Üye Girişi
Kullanıcı Adı:  
Şifre : 
Kaydet ?
Siteden tam olarak faydalanabilmek için üye olmalısınız.
Unuttuğunuz şifrenizi öğrenebilmek için kayıt sırasında verdiğiniz Hatırlatma Cevabı'nı bilmeniz gereklidir.
Şifre hatırlatma işlevini sadece 3 defa kullanma hakkınız vardır.
Kullanıcı adını ve şifresini unutan üyelere email ile yardım verilmez.

Aktivasyon Gelmedi mi?Aktivasyon mesajınız email adresinize gelmedi mi?
Buraya tıklayarak bir kez daha aktivasyon mesajı gönderilmesini sağlayabilirsiniz.
Lütfen email hesabınızın BULK ve SPAM klasörlerini de kontrol ediniz.
Rastgele Makale

İnet nesnesi ile pc kontrolü

Yazar: balasagun

Webmasterlar
Sitenize Ekleyin!
Sitenizde "Son Eklenen 10 Visual Basic Yazısı"'nı göstermek ve içeriğini zenginleştirmek için buraya tıklayınız.

Vbasicmaster.com'a link verin!
Aşağıdaki minik banneri sitenize eklemek için tıklayın!

Üye Sayısı:
Ziyaretçiler nerede?
Yayın № : 159
Yayın Tar:30.10.2003
Yazar : ygecer
Hit :6074

Bu Yazarın Yazıları Sadece bu yazarın  göster
Bu Yazıyı Tavsiye Et

HESAP MAKİNESİ:

Formumuza;

3 adet TextBox,

3 adet Label,

4 adet CommandButton ekleyelim.



KODLARI:

Private Sub BÖL_Click()
Text1.Text = Val(Text2) / Val(Text3)
End Sub

Private Sub ÇARP_Click()
Text1.Text = Val(Text2) * Val(Text3)
End Sub

Private Sub FARK_Click()
Text1.Text = Val(Text2) - Val(Text3)
End Sub

Private Sub TOPLA_Click()
Text1.Text = Val(Text2) + Val(Text3)
End Sub







Daha sonra 1 CommandButton daha ekleyerek, metin kutularını silmek için kullanalım. Şu kodları ekleyelim;


Private Sub SİL_Click()
Text1 = " "
Text2 = " "
Text3 = " "
End Sub





Yorumlar, eklemeler ve düşünceler
        bunu gönderene çok teşekkürlerişime çok yaradı

   ozkankartal, 24.02.2006 12:08
   okulda ders için lazımdı yaa çok saol

   sezko, 10.10.2006 16:20
   çok sağol. böyle küçük şeyleri yapmak zevkli oluyor. hem dönem ödevinin konusu da bu.
çok sağol...

   eu42, 16.12.2007 00:06
© Hakan Ersöz 2000-2013| Üyelik Sözleşmesi | | Ödeme Bildirimi
Sitemizden yenilikleri hemen öğrenin, pop upları engelleyin, chat yapın... ToolBarımızı indirin:
Vasicmaster Toolbar'ı indirin