Programalama > VISUAL BASIC.NET

Etiketler: not, hesaplama

Ort. 0
Puan ver:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Not1, Not2, Not3, Ortalama As Integer
        Not1 = TextBox1.Text
        Not2 = TextBox2.Text
        Not3 = TextBox3.Text
        Ortalama = (Not1 + Not2 + Not3) / 3
        Label4.Text = Str(Ortalama)
        If Ortalama < 45 Then MsgBox("Dersten çaktın")
        If Ortalama > 44 Then MsgBox("Dersten Geçtin")

    End Sub

özgür yılmaz
o26ur_18@hotmail.com


Yorumlar                 Yorum Yaz
cpzeki (0) Sakıncalı Yorum 15 April 22:13
kardeşim çok teşekkürler emeğine sağlık
KATEGORİLER
ASP - 240
ASP.NET - 24
C# - 75
C++ - 174
CGI - 8
DELPHI - 247
FLASH - 49
HTML - 536
PASCAL - 246
PERL - 11
PHP - 160
WML - 9
XML - 2
Copyright © 2002 - 2017 Hazır Kod - Tüm Hakları Saklıdır.
Siteden yararlanırken gizlilik ilkelerini okumanızı tavsiye ederiz.
hazirkod.com bir İSObil projesidir.