Visual Basic Not Hesaplama


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: x60    1 Yorum    202 Görüntüleme
  • Derecelendirme: 0/5 - 0 oy

Paylaşım Tarihi: 09.01.2016, 13:40:16 #1
x60 #Requiem
Cezalı Üye
Status: Çevrimdışı Yorumları:544 Konuları:160 Kayıt Tarihi:18.11.2015

Bu dersimizde Vb.net de not hesaplamayı öğrenicez

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Dim yazili(3) As Integer
        Dim sozlu(2) As Integer
        Dim ort, yazilitop, sozlutop, ytop, stp As Integer
        yazili(0) = Integer.Parse(txty1.Text)
        yazili(1) = Integer.Parse(txty2.Text)
        yazili(2) = Integer.Parse(txty3.Text)
        sozlu(0) = Integer.Parse(txts1.Text)
        sozlu(1) = Integer.Parse(txts2.Text)
        ort = 0
        ytop = 0
        stp = 0
        For k As Integer = 0 To 3

            If yazili(k) > 0 Then
                yazilitop += yazili(k)
                ytop += 1

            End If
        Next
        For j As Integer = 0 To 2

            If sozlu(j) > 0 Then
                sozlutop += sozlu(j)
                stp += 1

            End If
        Next


        ort = (yazilitop + sozlutop) / (ytop + stp)


        txtort.Text = Convert.ToString(Double.Parse(ort)) 


YARDIM EDEBİLDİYSEM NE MUTLU BANA     x60


Paylaşım Tarihi: 09.01.2016, 13:41:08 #2
x60 #Requiem
Cezalı Üye
Status: Çevrimdışı Yorumları:544 Konuları:160 Kayıt Tarihi:18.11.2015

Bilmeyenler için yararlı .










Aradığınızı Bulamadınız Mı ?

Konuyu Okuyanlar:
1 Ziyaretçi