Πώς να χρησιμοποιήσετε μια Select Case Με το Microsoft Visual Basic 2008

Έχετε δει " If ... Else " δηλώσεις που χρησιμοποιούνται σε προγράμματα ηλεκτρονικών υπολογιστών, αλλά όταν το πρόγραμμα περιλαμβάνει πολλές προϋποθέσεις είναι καλύτερο να χρησιμοποιήσετε ένα " Επιλέξτε ... υπόθεση " δήλωση. Αυτή η δήλωση έρχεται μία από τις πολλές ομάδες δηλώσεων , ανάλογα με την τιμή μιας έκφρασης . Αν η έκφραση δοκιμή ταιριάζει με οποιαδήποτε από τις εκφράσεις περίπτωση , οι δηλώσεις μετά τη δήλωση περίπτωση θα εκτελέσει . Χρησιμοποιήστε το "Case Else" δήλωση να εκτελεί κώδικα όταν η έκφραση δοκιμή δεν βρέθηκε. Οδηγίες
Η 1

την εφαρμογή Microsoft Visual Basic 2008 , κάντε κλικ στο " New Project ... " στο αριστερό τμήμα της οθόνης σας . . Κάντε διπλό κλικ στο " Εφαρμογή κονσόλας για να δημιουργήσετε ένα νέο έργο κονσόλα 2

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

Dim selectCaseNum As Integer = 3

με 3

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να δημιουργήσει μια κατασκευή Select υπόθεση και να εμφανίσετε μια γραμμή που αντιστοιχεί στην αξία του μεταβλητού αριθμού :

Επιλέξτε υπόθεση selectCaseNum

Περίπτωση 1 Σε 5

Console.Write ( "Ο αριθμός είναι μεταξύ 1 και 5 . " )

υπόθεση 6 , 7 , 8

Console.Write ( "Ο αριθμός είναι είτε 6 , 7 , ή 8 . " )

υπόθεση 9 σε 10

Console.Write ( " Ο αριθμός είναι ίσος με 9 ή 10 . " )

υπόθεση 11

Console.Write ( "Ο αριθμός είναι 11 . " )

Case Else

Console.Write ( "Number εισάγατε δεν είναι μεταξύ 1 και 11 . " )

End Select

MsgBox ( " Done ! " )
Η

4 Πατήστε το πλήκτρο " F5 " για να τρέξει το πρόγραμμα και να δείτε το αποτέλεσμα στο παράθυρο της κονσόλας .
Η

Η