The Bubble Sort é um dos primeiros algoritmos de ordenação instruídos por um estudante de ciência da computação, uma vez que é um dos mais simples de implementar e mais intuitiva . O procedimento básico é muito simples: a partir do início da matriz , o programa desloca-se através da matriz à procura de um elemento da matriz , que é maior do que aquele para a direita, e troca -los . Em seguida, ele começa de novo e repete o mesmo processo na nova matriz. Ele faz isso até que possa prosseguir com toda a matriz sem elementos de troca . Na prática , isso faz com que pareça que os elementos maiores na matriz são bolhas que flutuam para o topo da matriz . Instruções
1

Abra o Visual Basic e clique em "Arquivo " e " New Project" para criar um novo projeto. Selecione " ConsoleApplication ". Quando chega a hora de introduzir o seu código em um projeto real, com uma interface gráfica do usuário (GUI) , você pode simplesmente copiar esta função lá sem modificação.
2

Cole o seguinte código acima da "Main" função :

Sub BubbleSort ( ByRef arr () As Integer)

Dim Dim Temp

interruptor = True

Enquanto interruptor

interruptor = False

Para x = 0 To arr.Length - 2

Se arr (x) > arr (x +1) Então

temp = arr (x )

arr (x) = arr (x +1)

arr (x +1) = temperatura
interruptor

= True

End If

Próxima

End While

End Sub

Uma coisa importante é reconhecer que o arr é passado para a sub-rotina " ByRef ". Isso permite que a função de modificar o conteúdo da matriz
3

Cole o seguinte para a função "Main" para testar o método BubbleSort : .

Sub Main ()

Dim arr = { 3, 4, 5232 , 1, 232, 12, 34 , 14, 21 , 213, 213 , 21, 321 }

Console.WriteLine (" Unsorted " )

para cada x arr

Console.Write (x & " Cada x In arr

Console.Write (x & "" )

Próxima

Console.ReadKey ()

End Sub

End Module

Isso gera uma matriz simples , indiferenciados de inteiros e diz BubbleSort para classificá-los , em seguida, imprime os resultados.