Πώς να κάνει φούσκα Διαλογή στην VB.net

The Bubble sort είναι ένα από τα πρώτα αλγορίθμων ταξινόμησης μάθει από έναν φοιτητή της επιστήμης των υπολογιστών , δεδομένου ότι είναι ένα από τα απλούστερα για την εφαρμογή και πιο διαισθητική . Η βασική διαδικασία είναι απλή : από την αρχή του πίνακα , το πρόγραμμα κινείται μέσω της συστοιχίας ψάχνει για ένα στοιχείο του πίνακα που είναι μεγαλύτερο από το ένα στα δεξιά του, και τα swaps . Στη συνέχεια, αρχίζει ξανά και επαναλαμβάνει την ίδια διαδικασία για το νέο πίνακα . Το κάνει αυτό μέχρι να μπορέσει να προχωρήσει μέσα από ολόκληρο τον πίνακα χωρίς να αλλάξετε τα στοιχεία . Στην πράξη , αυτό το κάνει να μοιάζει σαν τα μεγαλύτερα στοιχεία στη συστοιχία είναι φυσαλίδες που επιπλέουν στην κορυφή του πίνακα. Οδηγίες
Η 1

Ανοίξτε Visual Basic και κάντε κλικ στο "Αρχείο" και " Νέο έργο " για να δημιουργήσετε ένα νέο έργο . Επιλέξτε " ConsoleApplication . " Όταν έρχεται η ώρα να εισάγετε τον κωδικό σας σε ένα πραγματικό έργο με μια γραφική διεπαφή χρήστη ( GUI ) , μπορείτε απλά να αντιγράψετε αυτή τη λειτουργία εκεί χωρίς τροποποίηση . 2

Επικολλήστε τον παρακάτω κώδικα πάνω από το " Main" λειτουργία :

Sub BubbleSort ( ByRef arr ( ) As Integer )

Dim temp

Dim διακόπτη = True

Ενώ διακόπτη

διακόπτης = False

Για x = 0 να arr.Length - 2

Αν arr ( x ) > arr ( x +1) Στη συνέχεια

temp = arr ( x )

arr ( x ) = arr ( x +1 )

arr ( x +1) = temp

διακόπτη = True

End If

Επόμενο

Τέλος Ενώ

End Sub

Ένα σημαντικό πράγμα που πρέπει να αναγνωρίσουμε είναι ότι η άφ περνά μέσα στο υποπρόγραμμα " ByRef . " Αυτή η λειτουργία επιτρέπει να τροποποιήσει τα περιεχόμενα του πίνακα εικόνων
3

Επικολλήστε τον ακόλουθο στο "Κεντρικό " λειτουργία για να δοκιμάσει τη μέθοδο BubbleSort : .

Sub Main ( )

Δημ. arr = { 3 , 4 , 5232 , 1 , 232 , 12 , 34 , 14 , 21 , 213 , 213 , 21 , 321 }

Console.WriteLine ( " Unsorted " )

Για κάθε τιμή x άφ

Console.Write ( x & " Κάθε x Σε άφ

Console.Write ( x & "" )

Επόμενο

Console.ReadKey ( )

End Sub

End Module

Αυτό δημιουργεί μια απλή , αδιαχώριστα σειρά ακεραίων και λέει BubbleSort να τις ταξινομήσετε , στη συνέχεια εκτυπώνει τα αποτελέσματα .
Η
εικόνων