Visual basic den anlayanlar?

[Empatik]

Bana Kabarcık sıralamasını (bubble Sort) anlatacak bir arkadaş var mı ? Yada elinizde bir kaynak . Okulda sunacağımda ona göre 0 dan başlayanlara anlatır gibi anlatırsanız iyi olur

 

[algea]

Wikipedia'da grafikle güzel bir şeklde anlatımı var. link

 

[Empatik]

Çok saol usta Mantığını kavradım sanırım gerisi bana kalıyor

 

[Empatik]

Wikipedia'da grafikle güzel bir şeklde anlatımı var. link

Birde örnek program verir misiniz .?

 

[algea]

Popüler bir algoritma internetten kolaylıkla bulabilirsin.

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim sd() As Decimal = New Decimal() {7D, 9D, 19D, 2D, 4D, 3D, 4D, 5D, 5D}
        BubbleSort(sd)
        ListBox1.DataSource = sd.ToList
    End Sub

       Private Sub BubbleSort(ByVal sortItems() As Decimal)
        Dim swapped As Boolean
        Do
            swapped = False
            For i As Integer = 0 To sortItems.Length - 2
                If sortItems(i) > sortItems(i + 1) Then
                    Dim hold As Decimal
                    hold = sortItems(i)
                    sortItems(i) = sortItems(i + 1)
                    sortItems(i + 1) = hold
                    swapped = True
                End If
            Next
        Loop While swapped
    End Sub
End Class

 

[Empatik]

Bana basit bir şey lazım :S

 

[engerex]

Bu örnek üzerinden biraz uğraşla yapabilirsin.

 

[Empatik]

Tamam engerex tüm olayı anladım saol Sanırım sıralamalar arasında en kolay olanı