Πώς να δημιουργήσετε μια λειτουργία σε Visual Basic

συναρτήσεις είναι επαναχρησιμοποιήσιμα κομμάτια κώδικα σε μία εφαρμογή . Θα σώσει τον προγραμματιστή κωδικοποίηση του χρόνου , παρέχοντας έναν τρόπο για να εκτελέσει την ίδια διαδικασία με απλά καλώντας τη λειτουργία , περνώντας μια μεταβλητή και επιστρέφει μια τιμή . Μπορείτε να δημιουργήσετε λειτουργεί ως μέρος του μια ξεχωριστή κατηγορία , ή η λειτουργία μπορεί να είναι ιδιωτικές και επαναχρησιμοποιήσιμα μόνο μέσα στην τρέχουσα κατηγορία . Οδηγίες
Η 1

Δημιουργήστε το κέλυφος λειτουργίας . Μια λειτουργία συμπυκνώνει κώδικα . Παρακάτω είναι ένα παράδειγμα μιας λειτουργίας που ελέγχει για σφάλματα .

Ιδιωτικούς CheckMyErrors Function ( ) Όπως BooleanEnd Λειτουργία

Η "Ιδιωτικό" κλειδί περιορίζει την ορατότητα και τον έλεγχο της λειτουργίας του εντός του τρέχοντος τάξη . Η « Όπως Boolean " κώδικα στο τέλος σημαίνει ότι η τιμή που επιστρέφεται από τη συνάρτηση είναι μια boolean μεταβλητή . 2

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

CheckMyErrors Private Function ( myString Όπως String ) Όπως BooleanEnd Λειτουργία
εικόνων 3

Επιστροφή μια τιμή . Η λειτουργία πρέπει να έχει επιστρέψει μια τιμή boolean . Μέσα σε δήλωση της συνάρτησης και το " End Function , " ο ακόλουθος κωδικός χρησιμοποιείται για να ελέγξει την τιμή συμβολοσειράς και επιστρέφει μια boolean του "True ", εάν η τιμή είναι κενή .

Αν myString = " " ThenCheckMyErrors = TrueElseCheckMyErrors = FalseEnd Αν
Η 4

Καλέστε τη λειτουργία . Η δημιουργία λειτουργία είναι πλήρης , έτσι τώρα μπορεί να κληθεί μέσα στον κώδικα . Σε αυτό το παράδειγμα , μια σειρά περνά με τη λειτουργία και δέχεται την επέστρεψε boolean .

Δημ. IsEmpty Όπως BooleanIsEmpty = IsEmpty ( " Γεια σου , αυτή η συμβολοσειρά δεν είναι κενό " ) « επιστρέφει False
Η

Η