folder Tahribat.com Forumları
linefolder Visual Basic - Basic - PicBasic ve Türevleri
linefolder Çok Değişik Bi Hesap Makinesi..(Radio Butonlu& Check Box"Lı Hesap Makinesi)



Çok Değişik Bi Hesap Makinesi..(Radio Butonlu& Check Box"Lı Hesap Makinesi)

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    kafkefhacker
    kafkefhacker's avatar
    Kayıt Tarihi: 09/Aralık/2008
    Erkek

     public class form 1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    If RadioButton1.Checked Then

    TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)

    End If

    If RadioButton2.Checked Then

    TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)

    End If

    If RadioButton3.Checked Then

    TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)

    End If

    If RadioButton4.Checked Then

    TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)

    End If

    End Sub

     

     

     

     

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

    If CheckBox1.Checked Then

    TextBox3.Text =Val(TextBox1.Text )+Val(TextBox2.Text)

    End If

    If CheckBox2.Checked Then

    TextBox3.Text =Val (TextBox1.Text )-Val (TextBox2.Text )

    End If

    If CheckBox3.Checked Then

    TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)

    End If

    End Sub

    End Class

    gerekli mazemler::::2 adet butn 4 adet radio butonu;3 adet check box 3 tanede textbox...amacı:texbox1 ve textbox 2 ye girlen sayıları radyo butonu veya checkbox yardımyla işlem yaparak textbox3 göstermektir...


    Y4 S3V Y4 T3RK 33T.
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    By_Gizemli
    By_Gizemli's avatar
    Banlanmış Üye
    Üstün Hizmet Madalyası
    Kayıt Tarihi: 11/Nisan/2007
    Erkek
    taşagına kuvvet :P

    Hayat Boş , Vur Göte Çoşşşş.
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    NmC
    NmC's avatar
    Kayıt Tarihi: 23/Kasım/2008
    Erkek

    Enee dünkü heygır la bu :) Sen video arasana kendine...

     

    http://www.google.com.tr/search?hl=tr&q=%22Private+Sub+Button1_Click(ByVal+sender+As+System.Object%2C+ByVal+e+As+System.EventArgs)+Handles+Button1.Click%22&btnG=Ara&meta=

     Bunu google dan biz de bulabiliriz. 

    Fuzuli bi paylaşım olmuş sanki...


    There are 10 types of people in the world. Those who knows binary and those who dont...
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    kafkefhacker
    kafkefhacker's avatar
    Kayıt Tarihi: 09/Aralık/2008
    Erkek
    bu  programın projesinin oldugu link::http://rapidshare.com/files/172181047/WindowsApplication3.rar

    Y4 S3V Y4 T3RK 33T.
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Swool
    Swool's avatar
    Kayıt Tarihi: 11/Kasım/2007
    Erkek

    ZoktriP bunu yazdı:
    -----------------------------

    Enee dünkü heygır la bu :) Sen video arasana kendine...

     

    http://www.google.com.tr/search?hl=tr&q=%22Private+Sub+Button1_Click(ByVal+sender+As+System.Object%2C+ByVal+e+As+System.EventArgs)+Handles+Button1.Click%22&btnG=Ara&meta=

     Bunu google dan biz de bulabiliriz. 

    Fuzuli bi paylaşım olmuş sanki...


    -----------------------------

     

     Biraz sakin ol istersen. Adamın açtığı her konuda parazitlik oluşturuyorsun...

  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    NmC
    NmC's avatar
    Kayıt Tarihi: 23/Kasım/2008
    Erkek

    Swool bunu yazdı:
    -----------------------------

    ZoktriP bunu yazdı:
    -----------------------------

    Enee dünkü heygır la bu :) Sen video arasana kendine...

     

    http://www.google.com.tr/search?hl=tr&q=%22Private+Sub+Button1_Click(ByVal+sender+As+System.Object%2C+ByVal+e+As+System.EventArgs)+Handles+Button1.Click%22&btnG=Ara&meta=

     Bunu google dan biz de bulabiliriz. 

    Fuzuli bi paylaşım olmuş sanki...


    -----------------------------

     

     Biraz sakin ol istersen. Adamın açtığı her konuda parazitlik oluşturuyorsun...


    -----------------------------

     

    Hocam problem orda zaten. Adamın açtığı 3 konu da birbirinin aynısıydı. Birinde programı yazmış diğer ikisinde de programı upload etmiş linkini vermiş...

    There are 10 types of people in the world. Those who knows binary and those who dont...
  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    SpArK
    SpArK's avatar
    Kayıt Tarihi: 17/Temmuz/2005
    Erkek

    Çok değişik bir hesap makinasımı yapmak istiyorsun , bu internete örnek olarak konulanlardan ? Yaptığın son 3-5 veya istediğin kadar işlemi geri alabilicek

    yani "undo" dediğimiz özelliğni kat bu hesap makinasina ozaman gercekten internetteki diger benzer orneklerinden daha degisik ve egitici ogretici olur.

    ( Ipucu,Not,keywords : Design Patterns => "Command Pattern" )

    @Edit : http://www.cihataltuntas.com/?p=35 , incelersen cok iyi olur

  8. KısayolKısayol reportŞikayet pmÖzel Mesaj
    u235
    u235's avatar
    Kayıt Tarihi: 31/Mart/2008
    Erkek

    ZoktriP bunu yazdı:
    -----------------------------

    Swool bunu yazdı:
    -----------------------------

    ZoktriP bunu yazdı:
    -----------------------------

    Enee dünkü heygır la bu :) Sen video arasana kendine...

     

    http://www.google.com.tr/search?hl=tr&q=%22Private+Sub+Button1_Click(ByVal+sender+As+System.Object%2C+ByVal+e+As+System.EventArgs)+Handles+Button1.Click%22&btnG=Ara&meta=

     Bunu google dan biz de bulabiliriz. 

    Fuzuli bi paylaşım olmuş sanki...


    -----------------------------

     

     Biraz sakin ol istersen. Adamın açtığı her konuda parazitlik oluşturuyorsun...


    -----------------------------

     

    Hocam problem orda zaten. Adamın açtığı 3 konu da birbirinin aynısıydı. Birinde programı yazmış diğer ikisinde de programı upload etmiş linkini vermiş...

    -----------------------------

     


     

     Bencede gerek yok adama şimdi laf sölemeye.
  9. KısayolKısayol reportŞikayet pmÖzel Mesaj
    kafkefhacker
    kafkefhacker's avatar
    Kayıt Tarihi: 09/Aralık/2008
    Erkek
    swool  saoll   da  harbıden   parazitlik yapma bence..yanii   bence   anlata  bildimmi??

    Y4 S3V Y4 T3RK 33T.
  10. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Asker
    Asker's avatar
    Banlanmış Üye
    Kayıt Tarihi: 02/Ekim/2005
    Erkek
    adamın şevkini kırmayın
Toplam Hit: 3938 Toplam Mesaj: 10