vb.net yardım

okanyuksel · 2010-04-26T18:45:17.0000000+03:00

arkadaşlar merhaba. vb.net'te hocanın dönem ödevi olarak verdiği öğrenci işleri programını yapıyorum ama 1-2 yerde tıkandım kaldım. [simage]]http://img88.imageshack.us/img88/8987/adszvqj.jpg[/simage] resimde görmüş olduğunuz gibi datagrid'e s1,s2,s3,soz1,soz2,ort,not,sonuc sütunlarını ekledim.burda yapmak istediğim; s1,s2,s3,soz1,soz2 değerlerini girerek toplamı 5'e bölen ve ortalamayı bulup ort bölümüne yazdırmak istiyorum. yardımcı olursanız sevinirim.

Sıcak Fırsatlarda Tıklananlar

Editörün Seçtiği Fırsatlar

Daha Fazla

Bu Konudaki Kullanıcılar: Daha Az

2 Misafir - 2 Masaüstü

5 sn

14
Cevap

0
Favori

1.103
Tıklama

Daha Fazla
İstatistik

Konu İstatistikleri Yükleniyor

Konuya Özel

0 oy

Öne Çıkar

Cevapla

Sayfa: 1

Giriş

Mesaj

Programcılıkta bir takım paradigmalar, kurallar filan vardır. Bunlar bir yığın tecrübeden sonra ortaya çıkmış kurallardır. Hiç bir kod bu kurallara uymadan yazılmış diye derleyici tarafından reddedilmez. Ama bu kurallara uymazsanız, kodunuz berbat olur.

Bunlardan biriside, Three-Tier modelidir. Uzatmayalım, bu kodu 3 katmana ayırmak demektir. En altta veritabanı bulunur. Veritabanı denince, hemen herkesin aklına SQL server filan gelir, ama alakası yoktur. Bu, verilerin saklandığı bölümdür, MySQL'de olabilir, bildiğiniz bir değişkende. Bunun üzerinde uygulama lojiği yer alır. Yani işlemler. En üstte ise, UI yeralır; yani User Interface, Kullanıcı arabirimi.

Her ne kadar bu daha ziyade client-server modeli için revaçta olsada, bunun stand-alone, yani kendi başına bir uygulama içinde çok faydalı bir mantalite olduğu kesindir.

Bu soru bağlamında öncelikle işaret edilmesi gereken şey şu: GUI, yani şu sizin form, o grid vs. verileri okumak ve göstermek içindir; onları saklamak için değil. Yani, o gridden verileri okuyacak, programdaki bir veritabanında tutacak, hesaplayıp oraya yazacaksınız. Veritabanı denince, ADO filan değil. Bildiğiniz bir değişken, array vs.

Peki neden?

Bir bakın bakalım. soz1 sütununa, 10 yazacağıma, elim aradaki 9'a gider ve 190 yazarsam, durum ne olur?

Kullanıcı, kendi hata yaptığını görmek istemez. Sözlüden 10, zayfı almış öğrencinin diğer notları da 10'dan farklı olmayacaktır. 5 x 10 = 50 / 5 = ortalama 10 olacakken, 4 x 10 + 190 = 230 / 5 = 46 dan, zayıf alacak öğrenci orta almış olacaktır ki, farkına bile varılamaz, arada kaynar gider. Ve öğrenci not ortalamasından geçer, skandal olur.

İşte en azından bunu önlemek için, ekranda değerleri tutmayın. Ekran göstermek ve okumak içindir.

Peki ne yapmanız gerekiyor?

 
  Private Sub dataGridView_CellValidating(ByVal sender As Object, _ 
      ByVal e As DataGridViewCellValidatingEventArgs) _ 
      Handles dataGridView.CellValidating 
      select case e.ColumnIndex  
           case 0 ' İlk sütun 
                 exit sub ' Bir şey yapmak gerekmiyor, diyelim.. 
           case 1 to 5 ' Not sütunları 
                 not = CInt(e.FormattedValue) 'Bunu yemez, not, VB için geçersiz bir değişkendir. 
                 bu_not = CInt(e.FormattedValue) 
                 if bu_not < 0 or bu_not > 100 then 
                         'Buraya hatalı girişte ne yapılacağını yazın.  
                         e.Cancel = True 
                         return False 
                 end if 
                 notTablosu(e.RowIndex, e.ColIndex) = bu_not   
                 ortalama = 0 
                 for i = 1 to 5 
                      ortalama = ortalama + notTablosu(e.RowIndex, i) 
                 next 
                 ortalama = ortalama / 5 
                 dataGridView.Rows(e.RowIndex).Cells(6).text = CStr(ortalama) '6, ortalam sütunu ise.. 
  end sub

Bu sanırım ne yapılması gerektiğini iyi kötü gösteriyordur. VB ile kod yazmayalı 6-7 yıl olmuştur. O yüzden hatalar olabilir, ama temel bileşenler sanırım sorunsuzdur.

Öncelikle öğrenci sayısı kadar bir/bir kaç array oluşturun: Dim ogrenciAdlari(25) as string, notlar(25, 5) as integer filan falan.

Notların hepsini bir döngü ile -1 yapın. Bu, girilmemiş not demek olsun.

Yukardaki event handler gibi bir şey yazarak, notların girilmesini sağlayın. Girilen her notu kontrol edin.

Ortamalayı bulmak için -1 olmayan notları toplayıp, bu gibi not sayısına bölün.

Sonucu grid'e yazın.. Elbette -1 olanlar için hede.text = '' olacak.

Kabaca böyle bir yol uygulayabilirsiniz. Detayları için, VB bilen anlayan elemanlar yardımcı olur sanıyorum. Ben VB ile uğraşmıyorum, uğraşmayı da istemiyorum. Yardımcı olayım desem, elimde Windows bile yok. MS'tan arınmış halde, gamsız kedersiz huzur içinde aleti kullanıyorum, darısı sizinde başınıza artık, ne diyeyim.

< Bu mesaj bu kişi tarafından değiştirildi skoylu -- 26 Nisan 2010; 21:43:12 >