Bazı Kodlar Vericem.
Textten Texte yazı aktarımı yapmak.
Buton Koyun. Bunu Ekleyin.
Text2.Text = Text1.text Yani 1. texte yazdıgınız 2 ye geciyor.
Çalıştır Yapımı:
Bir Buton 1 text.
Buton Kodu:
Shell text1.text
Webbrowser Yapımı.
Ara Butonu:
Webbrowser1.Search
Git:
Webbrowser1.GoForward
Geri:
Webbrowser1.GoBack
Anasayfa:
Webbrowser1.GoHome
Yenile:
Webbrowser1.Ref.Resh (Nokta Koymayın Siz.)
Eklenecekler: Components Menüsünden Microsoft Internet Control Ve Butonlar.
Hesap Makinesi Yapımı:
4 Buton 2 Label 3 Text.
Topla:
Topla butonuna yazılacak kodlar;
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
Label1.Caption = "+"
Çıkar:
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
Label1.Caption = "-"
Çarp:
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
Label1.Caption = "*"
Bol:
Text3.Text = Val(Text1.Text) / Val(Text2.Text)
Label1.Caption = "/"
KareKok:
Text3.Text = Sqr(Val(Text3.Text))
28 Nisan 2014 Pazartesi
VB6 Bazı Kodlar
Kaydol:
Kayıt Yorumları (Atom)
Hiç yorum yok:
Write yorum