27 Şubat 2012 Pazartesi

Asp.net te if Yapısı

   Arkadaslar If'in kelime anlamı 'eğer'dir. Koşullarda kullanırız eğer şu olursa şöyle olur gibi Then in Kelime Anlamı 'o zaman'dır.
   mesela;
           Dim a As Integer =  t1.Text
           Dim b As Integer =  t2.Text
           if (a = b) Then
          lblsonuc = "a eşittir b"
          Else
         lblsonuc = "a eşit değildir b "
          End if
    Burada da diyor ki arkadaslar  a ve b diye 2 tane değişkenimiz var Eğer a,  b ye eşit ise  lblsonuc'a a eşittir           b yazar else yani değilse lblsonuc'a a eşit değildir b yazar.

    Adınız = <asp:TextBox ID="t1" runat="server" /><br />
    Soyadınız = <asp:TextBox ID="t2" runat="server" /><br />
    Mail Adresiniz = <asp:TextBox ID="t3" runat="server" /><br />
    <asp:Label ID="l4" runat="server" /><br />
    <asp:Button ID="b1" runat="server" Text="Gönder" />

     Butonun Click Olayındada Su Kodları Yapıştırın :


        Dim i As String = t1.Text
        Dim j As String = t2.Text
        Dim k As String = t3.Text

        If (i = "") And (j = "") And (k = "") Then
        l4.Text = "Hatalı Giriş ! Adınızı  Soyadınızı Ve Mail Adresinizi Giriniz "
       'Şu An ki Koşul da  3 kutucuğuda hiç birsey girilmezse Ekrana = Hatalı Giriş ! Adınızı  Soyadınızı Ve       Mail Adresinizi Giriniz yazdırır.
       Else
       If (i = "") And (j = "") Then
       l4.Text = "Hatalı Giriş ! Adınızı Soyadınızı Giriniz"
       'Şu An ki Koşul da i ve j bos ise ekrana = Hatalı Giriş ! Adınızı Soyadınızı Giriniz yazdırır.
        Else
        If (i = "") And (k = "") Then
        l4.Text = "Hatalı Giriş ! Adınızı Mail Adresinizi Giriniz"
        'Şu An ki Koşul i ve k bos bırakılır ise ekrana = Hatalı Giriş ! Adınızı Mail Adresinizi Giriniz yazılır.
         Else
         If (j = "") And (k = "") Then
         l4.Text = "Hatalı Giriş ! Soyadınızı Mail Adresinizi Giriniz"
         'Şu An ki Koşul j ve k bos bırakılır ise ekrana = Hatalı Giriş ! Soyadınızı Mail Adresinizi Giriniz yazılır.
          Else
          If (i = "") Then
          l4.Text = "Hatalı Giriş ! Adınızı Giriniz"
          'Şu An ki Koşul i boş bırakılır ise ekrana = Hatalı Giriş ! Adınızı Giriniz yazılır
          Else
          If (j = "") Then
          l4.Text = "Hatalı Giriş ! Soyadınızı Giriniz"
         'Şu An ki Koşul j boş bırakılır ise ekrana = Hatalı Giriş ! Soyadınızı Giriniz yazılır
          Else

          If (k = "") Then
          l4.Text = "Hatalı Giriş ! Mail Adresinizi Giriniz"
          'Şu An ki Koşul k boş bırakılır ise Ekrana = Hatalı Giriş ! Mail Adresinizi Giriniz yazılır
           Else
           l4.Text = "Doğru Giris Yaptınız :)"
           'Eğer Bundan Once Yazdığım Kosullardan Hiçbiri sağlamıosa yani tum metin kutucuklarına karakter giriliyorsa Ekrana = Doğru Giris Yaptınız :) yazılır
             End If
             End If
             End If
             End If
             End If
             End If
             End If

         Arkadaslar önünde tek tırnak olan cümleler yorum satırıdır visual studio tarafından çalıstırılmaz gormezden gelinir orada acıklamaları yaptım yararlı olmuşumdur umarım

Web Tasarım Öğretmenim = http://ozguryaman.com/

25 Şubat 2012 Cumartesi

Asp.net te Matematik İşlemleri

Arkadaslar ASP.NET te yaptığım basit bi calısma 




<asp:TextBox ID="txt1" runat="server" />
    <asp:TextBox ID="txt2" runat="server" />


<br />


 <asp:Button ID="Button16" runat="server" Text="Hepsi" />


 <asp:Label ID="sonuc" runat="server"  /><hr />
    <asp:Label ID="sonuc1" runat="server" /><hr />
    <asp:Label ID="sonuc2" runat="server" /><hr />
    <asp:Label ID="sonuc3" runat="server" /><hr />
    <asp:Label ID="sonuc4" runat="server" /><hr />
    <asp:Label ID="sonuc5" runat="server" /><hr />
    <asp:Label ID="sonuc6" runat="server" /><hr />
    <asp:Label ID="sonuc7" runat="server" /><hr />
    <asp:Label ID="sonuc8" runat="server" /><hr />
    <asp:Label ID="sonuc9" runat="server" /><hr />

Bunları Yazdıktan sonra desing kısmında Text'i hepsi olan button a cift tıklayarak button16'nın click durumunu olusturdı,um biliyorsunuz ki click durumu tıklayınca sonra oraya asağıdaki kodları yazdım ve Mod Alma, Ust Alma Carpma, Bolum, Toplama, Cıkartma  Kok Alma, Mutlak Değer İşlemlerini yaptırdım. Şoyle bi sorunuz olabilir mesela mutlak değer alırken 1 sayı giriyoruz ama diğer toplamada falan 2 sayi giriyoruz diyebilirsiniz. Onun Cevabını Veriyim Kok Alma Ve Mutlak değerde textbox1'deki gecerlidir. 


 Dim sayi1 As Single
        Dim sayi2 As Integer


        sayi1 = txt1.Text
        sayi2 = txt2.Text


        sonuc.Text = "Mod Alma = " & sayi1 Mod sayi2
        sonuc1.Text = "Ust Alma = " & sayi1 ^ sayi2
        sonuc2.Text = "Carpma = " & sayi1 * sayi2
        sonuc3.Text = "Bolüm = " & sayi1 / sayi2
        sonuc4.Text = "Toplama = " & sayi1 + sayi2
        sonuc5.Text = "Cıkarma = " & sayi1 - sayi2
        'sonuc6.Text = "Yuvarlama = " & Round(sayi1, sayi2)
        sonuc7.Text = "Kok Alma = " & Sqrt(sayi1)
        sonuc8.Text = "Mutlak Değer = " & Abs(sayi1)

Web Tasarım Ve Programlama Öğretmenim = http://ozguryaman.com/