Μια υπορουτίνα αποτελείται από μια σειρά από Visual Basic δηλώσεις , που περικλείεται από το " Sub" και " End Sub " δηλώσεις . Μια διαδικασία η λειτουργία αποτελείται επίσης από μια σειρά από Visual Basic δηλώσεις, αλλά πρέπει να περικλείεται από το "Λειτουργία" και " End Function " δηλώσεις . Όλα εκτελέσιμο κώδικα πρέπει να είναι μέσα και μια υπορουτίνα και μια διαδικασία λειτουργίας . Και οι δύο μπορούν να ορίζονται στις ενότητες , κατηγορίες , και τις δομές .
Εικόνων Δήλωση
Η
Μπορείτε να δηλώσετε μια υπορουτίνα με έναν τρόπο παρόμοιο με το πώς θα δηλώσετε μια μεταβλητή , με προσδιορίζοντας το όνομα της παραμέτρου και τον τύπο δεδομένων . Μπορείτε να καθορίσετε το μηχανισμό περάσματος παραμέτρων όπως " ByVal " ή " ByRef . " Κάθε παράμετρος αντιμετωπίζεται ως μια τοπική μεταβλητή στην υπορουτίνα , που σημαίνει ότι η διάρκεια ζωής της παραμέτρου είναι η ίδια με εκείνη της διαδικασίας. Σε λειτουργία , μπορείτε να δηλώσετε τον τύπο δεδομένων της τιμής που επιστρέφει όπως " Ακέραιος " ή "Double ". Εάν δεν καθορίσετε το " returntype , " η συνάρτηση θα επιστρέψει μια " Object" τύπο δεδομένων .
Η Επιστρέφοντας δεδομένων
Η
Στη VB , μπορείτε να περάσει ένα επιχείρημα σε μια διαδικασία ( υπορουτίνα ή συνάρτηση ) με την τιμή ή με αναφορά καθορίζοντας το « ByVal " ή " ByRef " λέξεις-κλειδιά . Από προεπιλογή μια υπορουτίνα και μια λειτουργία αντιμετωπίζουν τα επιχειρήματά τους ως προς την αξία , πράγμα που σημαίνει ότι η διαδικασία δεν μπορεί να τροποποιήσει το περιεχόμενο της μεταβλητής στοιχείου στον κώδικα κλήσης . Μια συνάρτηση θα επιστρέψει μια τιμή από την ανάθεση της τιμής στο όνομα της συνάρτησης , ή να συμπεριληφθεί στην «Επιστροφή» δήλωση. Μια υπορουτίνα συνήθως δεν επιστρέφει μια τιμή , αλλά μπορείτε να ορίσετε ένα επιχείρημα ως « ByRef " για να επιστρέψει μια τιμή ως παράμετρο .
Εικόνων Παράδειγμα
Η
Το παρακάτω είναι ένα παράδειγμα μιας υπορουτίνας :
Sub tellOperator (εργασία ByVal Όπως String )
Dim σφραγίδα Όπως Ημερομηνία
σφραγίδα = TimeOfDay ( )
MsgBox ( " ξεκινώντας " & task & " στο " & CStr ( σφραγίδα ) )
End Sub
το ακόλουθο είναι ένα παράδειγμα μιας συνάρτησης :
myFunction λειτουργία ( ByVal j As Integer ) As Double
Επιστροφή 3,87 * ι
End Function
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα