Gorsel Programlama | Görsel Programlama | C#.Net | VB.Net | C# Console

ana sayfa > Görsel Programlama, VB.NET > Sayıları Büyükten Küçüğe , Küçükten Büyüğe Sıralama VB.Net

Sayıları Büyükten Küçüğe , Küçükten Büyüğe Sıralama VB.Net

Pazar, 17 Oca 2010 yorum ekle yorumlara git

Girilen sayıları listboxa kaydedip ve tekrar yan listboxtta büyükten küçüğe ve küçükten büyüğe sıralayan program.. 3.yazılı 1.soru.. 

 

sayi 

<!–[if gte mso 9]> Normal 0 21 false false false MicrosoftInternetExplorer4 <![endif]–><!–[if gte mso 9]> <![endif]–>
Yukarıdaki form görüntüsüne sahip programın kodlarını yazınız. İlk düğmeden sayılar girilecek  , 2. ve 3. Düğmeden de sıralama işlemleri yapılacaktır.  

Programımız 3 Button , 3label ve 3ListBoxtan Oluşuyor.. 

Yapılışı; 

Önce Form1′de Değişken Tanımlayacağız; 

Dim sayı(10) As Integer
Dim sayaç, sayaç2, geçici As Integer

Button1 (sayıları gir ) Yazılacaklar; 


For sayaç = 1 To 10
sayı(sayaç) = InputBox(sayaç & ".sayıyı gir")
ListBox3.Items.Add(sayı(sayaç))

Next

Button2 (Küçükten büyüğe) yazılacaklar; 


For sayaç = 1 To 9
For sayaç2 = sayaç + 1 To 10
If sayı(sayaç2) < sayı(sayaç) Then
geçici = sayı(sayaç)
sayı(sayaç) = sayı(sayaç2)
sayı(sayaç2) = geçici

End If
Next
Next

For sayaç = 1 To 10
ListBox1.Items.Add(sayı(sayaç))

Next

Button3 (Büyükten Küçüğe) yazılacaklar, 

For sayaç = 1 To 9
For sayaç2 = sayaç + 1 To 10
If sayı(sayaç2) > sayı(sayaç) Then
geçici = sayı(sayaç)
sayı(sayaç) = sayı(sayaç2)
sayı(sayaç2) = geçici

End If
Next
Next

For sayaç = 1 To 10
ListBox2.Items.Add(sayı(sayaç))

Next

PROJEYİ İNDİR








Rica: Sitemizin Google'da Ön Sıralarda Çıkması İçin Lütfen Alttaki Google+ Butonuna Tıklayınız , Sayfamızı Facebookta Beğeniniz veya yazıları Twitter,Facebookta paylaşınız.
Paylaş :



Böyle bir web sayfam olsun diyorsanız iletişim bölümünden veya [email protected] mail adresinden bize ulaşabilirsiniz.


Tüm cep telefonu aksesuar fırsatları için tıklayın !

  1. şimdilik yorum yok.
  1. şimdilik geri bağlantı yok