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/
Asp.Net
27 Şubat 2012 Pazartesi
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)
<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/
Kaydol:
Kayıtlar (Atom)