Algorithms/Sorting-bubble sort

in visual basic: