Sayıları dizi ile büyükten küçüğe sıralama

Bu dersimizde girilen 10 sayıyı büyükten küçüğe ListBox'a yazdıran kodları göstermek istiyorum. Gerekli Nesneler: 1 tane ListBox

Bu dersimizde girilen 10 sayıyı büyükten küçüğe ListBox'a yazdıran kodları göstermek istiyorum.

Gerekli nesneler:
- 1 tane ListBox


Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim sayi(10), yedek, k, i, j As Long

        For i = 1 To 10

            sayi(i) = InputBox(i & ".Sayıyı Giriniz...")

        Next i

        For i = 1 To 10

            For j = 1 To 10

                If sayi(i) > sayi(j) Then

                    yedek = sayi(j)

                    sayi(j) = sayi(i)

                    sayi(i) = yedek

                End If



            Next j

        Next i

        For k = 1 To 10

            ListBox1.Items.Add(sayi(k))

        Next k

    End Sub

End Class

  • Etiketler;
Yorum Yaz

Yorum yazabilmek için üye girişi yapmanız gerekiyor!

çok güzel biçalışma olmuş emeğinize sağlık:D:D
teşekkürler...:)
aslında ders guzel ama dizileri sıralamak ıcın 'array.sort(sayı)' demek yeterlı olurdu bu ornege gore ama olsun ellerıne saglık en azından dongu vs komutlarını ogrenıyorlar
ArrayList rakam = new ArrayList(); private void Form1_Load(object sender, EventArgs e) { rakam.Add(10); rakam.Add(20); rakam.Add(15); listBox1.Items.Add(rakam[0].ToString()); listBox1.Items.Add(rakam[1].ToString()); listBox1.Items.Add(rakam[2].ToString()); } private void button1_Click(object sender, EventArgs e) { rakam.Sort(); for (int i = 0; i < rakam.Count; i++) listBox2.Items.Add(rakam[i].ToString()); } private void button2_Click(object sender, EventArgs e) { rakam. } } iki listbox ve iki buton ile sıralama işlemini yaptım. iyi çalışmalar...
çok güzel olmuş ama ben bunu console ile yapmak istesem son döngüdeki eklemeyi nasıl yapmalıyım teşekkürler
merhaba arkadaşlar bir program yapmam gerekiyor sayısal loto mantığı iki listbox açtım 1 den 49a kadar sayıları form load olduğunda list1 de aktardım ordan 6 sayıyı rastgele seçtirdim ama bunları labele aktarırken büyükten küçüğe sıralamasını istiyorum nasıl yapacağım konusunda yardımcı olursanız çok sevirinirim şimdiden tşkler

Yukarı Git