Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!

Gönderen Konu: 2 sayıyı toplayıp ortalamasını textbox a yazan kod  (Okunma sayısı 2021 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı mehmet123

  • Yeni Üye
  • *
  • İleti: 1
  • Rep: +0/-0
2 sayıyı toplayıp ortalamasını textbox a yazan kod

Çevrimdışı CriMiNaL

  • Yeni Üye
  • *
  • İleti: 14
  • Rep: +0/-0
Ynt: 2 sayıyı toplayıp ortalamasını textbox a yazan kod
« Yanıtla #1 : 10 Haziran 2009 22:53:52 »
Partial Class hesapla
Kod: vb.net
  1.     Inherits System.Web.UI.Page
  2.  
  3.     Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
  4.         Dim y1, y2, y3, s1, s2, s3, topla As Integer
  5.         Dim sonuc As Double
  6.         Try
  7.             y1 = TextBox1.Text
  8.             y2 = TextBox2.Text
  9.             y3 = TextBox3.Text
  10.             s1 = TextBox4.Text
  11.             s2 = TextBox5.Text
  12.             s3 = TextBox6.Text
  13.             topla = y1 + y2 + y3 + s1 + s2 + s3
  14.             sonuc = topla / 6
  15.             Label1.Text = "Not ortalamanız " & sonuc
  16.         Catch ex As Exception
  17.             Response.Write("Boş Not Girmeyiniz!")
  18.         End Try
  19.     End Sub
  20.  
  21.     Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
  22.  
  23.     End Sub
  24. End Class

__________________________________________________________________________________


BUYUR KARDESİM İNS İŞİNE YARAR 4 SAYININ ORTALAMSI ŞEKLİNDE SN 2 YAPARSIN HERALDE KENDİN YAPAMAZSAN SÖLE BANA AYARLIYIM !!
« Son Düzenleme: 11 Haziran 2009 00:01:50 by Kocaturk »

Çevrimdışı cebeser

  • Kıdemli Üye
  • *****
  • İleti: 53
  • Rep: +0/-1
Ynt: 2 sayıyı toplayıp ortalamasını textbox a yazan kod
« Yanıtla #2 : 04 Nisan 2011 17:19:32 »
begin

//Eğer textbox 1 veya 2 boş değilse
if (textbox1.text<>'')or(textbox2.text<>'') then
       begin
//iki kutudaki rakamları önce sayı formatına çevirip topla ve 2ye böl, sonra oluşan sayıyı tekrar stringe çevir
              textbox3.text := inttostr((strtoint(textbox1.text )+strtoint(textbox2.text ))/2);
//Eğer textbox 1 veya 2 boş ise mesaj kutusu ile uyar!
       end else showmessage('Kutuları boş bırakmayınız');

end;

Çevrimdışı trizeplin

  • Kıdemli Üye
  • *****
  • İleti: 56
  • Rep: +0/-0
  • Cinsiyet: Bay
Ynt: 2 sayıyı toplayıp ortalamasını textbox a yazan kod
« Yanıtla #3 : 04 Nisan 2011 18:50:46 »
cebeserin kod patlar strtoint deil float olmalı bölümler tam sayı olmayabilir onun dısında cillop gibin

Çevrimdışı cebeser

  • Kıdemli Üye
  • *****
  • İleti: 53
  • Rep: +0/-1
Ynt: 2 sayıyı toplayıp ortalamasını textbox a yazan kod
« Yanıtla #4 : 04 Nisan 2011 20:01:20 »
Kesinlikle, hakılısın.