VBA Λειτουργία Switch

Λειτουργία διακόπτη VBA αξιολογεί την εκφράσεις και επιστρέφει τιμές που συνδέουν με αυτές τις εκφράσεις . Αυτή η συμπεριφορά επιτρέπει προγράμματα VBA σας για τη λήψη αποφάσεων , με τη μορφή του "αν - τότε" και παρόμοιες καταστάσεις. Για παράδειγμα , μπορείτε να χρησιμοποιήσετε το διακόπτη για να επιστρέψουν οι τιμές βασίζονται σε εκφράσεις που αφορούν την ηλικία , όπως τα ονόματα των ανθρώπων που ταιριάζουν με μια συγκεκριμένη ηλικία . Μπορείτε έπειτα να χρησιμοποιήσετε το " αν-τότε " δήλωση στην διαδρομή εκτέλεσης του προγράμματος για την κωδικοποίηση κατάλληλα για αυτό το πρόσωπο . Πρώτη Επιχείρημα
Η

Το πρώτο όρισμα της συνάρτησης Switch είναι μια έκφραση που θέλετε VBA να αξιολογήσει . Η έκφραση μπορεί να αξιολογεί κάθε τύπο μεταβλητής στην VBA , συμπεριλαμβανομένων των ακεραίων , έγχορδα και άλλα είδη . Switch θα δοκιμάσει την έκφραση . Αν αυτό οδηγεί σε "true " Switch θα επιστρέψει την τιμή που έχετε συνδέσει με αυτήν την έκφραση . Καθορίστε την τιμή αυτή ως το επιχείρημα αμέσως μετά το επιχείρημα που περιέχει την έκφραση . Για παράδειγμα , μπορεί να θέλετε να δοκιμάσετε την έκφραση " ηλικία = 40 " και έχουν VBA επιστρέψει την τιμή " Clark " αν η ηλικία είναι 40. Για να επιτευχθεί αυτό , να γράψει μια δήλωση διακόπτη όπως " Switch ( ηλικία = 40 , " Clark " ) "
εικόνων Δεύτερο επιχείρημα
Η

Κάθε δεύτερο επιχείρημα στη δήλωση Switch αναφέρεται σε η τιμή που θέλετε Switch να επιστρέψουν αν το επιχείρημα αμέσως πριν από την τιμή αληθής . Με άλλα λόγια , αν το " Lois " είναι η τιμή που θέλετε να επιστρέψετε Switch αν η έκφραση «ηλικία = 35 " είναι αλήθεια, τότε να γράψετε μια δήλωση Switch σαν αυτό : " Switch ( ηλικία = 35 , " Lois " ) " . Σημειώστε ότι δεν χρειάζεται να χρησιμοποιήσετε χορδές για αυτό το επιχείρημα αξία . Τεκμηρίωση VBA δηλώνει ο τύπος επιχείρημα είναι "παραλλαγή ", το οποίο σημαίνει ότι μπορείτε να κάνετε ακέραιοι επιστροφή Switch , δίκλινα ή άλλους τύπους τιμών .

Η τιμή επιστροφής
Η

τιμή επιστροφής διακόπτη παίρνει ένα από τα παρακάτω : μία τιμή από ένα από τα επιχειρήματα που καθορίσατε , ή " Null ", αν κανένας από τους εκφράσεις λες Αλλαγή σε αξιολόγηση των αποτελεσμάτων σε τιμή "True ". Για παράδειγμα , εάν η μεταβλητή "ηλικία" στην ακόλουθη δήλωση είναι 40 ή 35 , Switch θα επιστρέψει είτε " Clark " ή " Lois ". Αν «ηλικία» δεν είναι ούτε 40 ούτε 35 , Switch θα επιστρέψει Null .

Switch ( ηλικία = 40 , " Clark " , ηλικία = 35 , " Lois " )
εικόνων Πρόγραμμα Δείγμα
Η

Μπορείτε να καταλάβετε τη δήλωση Switch πιο εύκολα , εκτελώντας ένα μικρό πρόγραμμα που χρησιμοποιεί αυτή τη δήλωση . Το παρακάτω πρόγραμμα χρησιμοποιεί διακόπτης με δύο ζεύγη εκφράσεις για να αξιολογήσει και τις αξίες για να επιστρέψει . Σημειώστε ότι η μεταβλητή " v" δεν έχει συγκεκριμένο τύπο στη δήλωσή του . Ο λόγος για αυτό είναι να δοθεί έμφαση στο γεγονός ότι τα επιχειρήματα Switch και να επιστρέψει τιμές μπορεί να πάρει οποιοδήποτε τύπο .

Sub Ages ( )

Dim κατά

Dim ηλικία As Integer

ηλικία = 40

v = Switch ( ηλικία = 40 , " Clark " , ηλικία = 35 , " Lois " )

Debug.Print κατά

End Sub
Η
εικόνων