döngü kullanımı

asp.net de döngü yapıları

asp.net -> For Each nedir?, For Each kullanımı

4 Nis

Esma KAFADAR tarafından döngü kullanımı kategorisinde yayınlanmıştır

Yorum yok

dizileri ve listeleri kontrol etmek için kullanılan döngü yapısına for each denir.

örnek1:

Günler dizininin elemanlarını teker teker  ekrana yazan for each döngüsü

Dim gunler() As String={"pazartesi","salı","çarşamba","perşembe","cuma","cumartesi","pazar"}
For Each bilesen As String In gunler
Response.Write(bilesen)
Next

 

örnek2:

Listbox içndeki bileşenleri teker teker ekrana yazan for each kodlaması

For Each eleman As ListItem In ListBox1.Items
Response.Write(eleman)
Next

 

örnek3:

listbox içindeki bileşenlerde ikiye bölünenleri ekrana yazan for each kodlaması

For Each eleman As listitem In listbox1.items
If(convert.to double(eleman.value)mod 2=0)Then
response.write(eleman.text)
End If

 

örnek4:

Listbox içindeki isimlerden içinde e harfi olanları dropdown kontrolüne ekleyen kodlama

For Each eleman As listitem In listbox1.items
If(eleman.text.contains("e")) Then
dropdownlist1.items.add(eleman)
End If
Next

 

örnek5:

Textbox’a girilen değerlerden daha önce  eklenmemiş olan değerleri listbox’a ekleyen kodlama

Dim var As boolean=false
'listeyi kontrol ediyoruz.
For Each eleman As listitem In listbox1.items
If(eleman.text=textbox1.text) Then
var=true
End If
Next
'değer yok ise ekleme yapıyoruz.
If(var=false)Then
listbox1.items.add(textbox1.text)
else
response.write(var)
End If

 

asp.net -> while döngüsü kullanımı

4 Nis

Derman KAYIHAN tarafından Asp.net kategorisinde yayınlanmıştır

Yorum yok

 

Belirtilen koşul geçerli olduğu sürece verilen işlemleri yapan döngü tipidir. Şart gerçekleşmediği zaman döngü çalışmayı bitirir. For döngüsündeki gibi tekrar sayısı belli değildir , önemli değildir. Döngünün çalışması için sayaç tutmak gerekmez. Ancak sayaç değişkeni kullanılarak for döngüsüne benzetilir.

Örnek :

Kullanıcının verdiği değere kadar olan sayıları ekrana yazan döngü.

Dim sayi As Integer = TextBox1.text

Dim sayac As Integer

While (sayac < sayi )

Response.Write (sayac)

sayac = sayac+1

End While

DoWhile,DoUntil,DoLoop

DoWhile:

Bu yapıda önce şart kontrol edilir. Şarta göre işlem yapılır yada yapılmaz.DoLoop While

Önce işlemi gerçekleştirir. Eğer şart gerçekleşiyor ise işleme devam eder yada etmez.

Dim sayi as integer = 0

Dim sayac as integer

Do

Response. Write ("Mesaj")

sayac +=1

Loop While (sayac<sayi)
Dim sayi As Integer = 5

Dim sayac As Integer

DoWhile (sayac < sayi )

Response.Write ("mesaj")

sayac + = 1

Loop
Fibonacci Dizisi

asp.net -> Döngü Nedir? for next döngüsü

17 Mar

Ümit Demirel tarafından döngü kullanımı kategorisinde yayınlanmıştır

Yorum yok

Programlama dillerinde bir işlemi belirli sayıda ve belirli bir koşul gerçekleşinceye kadar tekrarlatmak istiyorsak döngü deyimlerini kullanırız.
Döngü deyimleri su döngüsüne benzetebiliriz. Su döngüsünde su buharlaşır havada soğur yağmur olarak tekrar yere düşer ve yine buharlaşır. Bu sonsuz bir döngüdür. Programlama dilinde de döngüyü böyle düşünebiliriz. Fakat programlama dillerinde döngüler bizim belirlediğimiz bir şarta kadar devam eder.VB.NET’te döngü komutları şöyle sıralayabiliriz. Şimdi bu döngü deyimlerinden For – Next  deyimini görelim
For - Next Döngüsü :

Tekrar sayısı belli olan işlemlerde For döngüleri kullanılır.

for döngüsü nasıl kullanılır? Kullanım Şekli :
Örnek 1
For i = 1 To 10
      Response.Write ("Merhaba")
Next

Ekran Çıktısı :Ekrana 10 kere Merhaba yaza.

Döngülerde kullanılan bir başka anahtar kelime ise Step tir. Step deyimi döngünün artış değerini belirler.Eğer artış değeri belirtilmez ise program 1 olarak değeri alacaktır.

For Next döngüsünde Step Kullanımı :
0 ile 10 arasındaki çift sayıları ekrana yazan kodlama

Örnek 2 : 
For i = 1 To 10 Step 2
       Response.Write ("i")
Next

yukarıdaki örnek ,1 ile 10 arasındaki tek sayıları ekrana yazar.


Örnek  3:

   
For i = 0 To 10 Step 2
       Response.Write ("i")
Next

yukarıdaki örnek 0 -10 arasındaki çift sayıları yazar

Örnek 4:
Ekrana ardarda Türkiye kelimesini sıralayan program kodudur.

For i = 1 To 3
       Response.Write ("Türkiye" "<br>")
Next

 

Örnek 5:
0-100 arasındaki ardışık sayılardan sadece 3’e bölünebilenleri listeyen programdır.

For i = 0 To 100 Step 3
       Response.Write (i & " | ")
Next
Örnek 6 :
For i = 1 To 150
     if ( (i mod 3 = 0 ) And ( i mod 5 = 0) ) Then
           Response.Write ( i & <"br">)
     And İf
Next

150 ye kadar olan sayılar arasında 15 ‘ e bölünebilen sayıları yazan program

Örnek 7 :

Dim sayi As Byte = txtsayi.Text

Dim fak As Long = 1

      For i = 1 To sayi

            fak = fak * i

      Next

      Response.Write ( fak )

Verilen sayının faktöriyelini alan program kodları

Örnek 8 :

Dim a , b , toplam , i As Long

      a = 0
      Response.Write (a  &  " " )

      b = 1
      For i = 1 To 101
           toplam = a+b
      Response.Write ( " " & toplam & " ")
      b = a
      a = toplam
      Next

Fibonacci dizisinin ilk 100 elemanını bulan program kodu.

Örnek 9 :

For i = 1 To 100

     ListBox1.Items.Add ( i )

Next

1 ‘ den 100 ‘ e kadar olan sayıları listbox ‘ a eklemek

Örnek 10 :

Dim fak , i As Long

Dim sayi As İnteger = Listbox1.SelectedItem.Text

      fak = 1

      For i = 1 To sayi

           fak = fak * i

      Next

 Label1.Text = fak

ListBox ‘ ın içindeki seçilen bir sayının faktöriyelini alan program kodları