Visual Basic Tutorial : MsgBox

Η λειτουργία MsgBox υπάρχει τόσο Visual Basic 6.0 και Visual Basic.NET . Σε δύο εκδόσεις , παρέχει έναν απλό τρόπο για τον προγραμματιστή να εμφανίσει ένα μήνυμα κειμένου και περιλαμβάνει συγκεκριμένες επιλογές για την αντιμετώπιση των χρηστών . Αυτές οι επιλογές περιλαμβάνουν κουμπιά που έγραφε " OK " ή " Ναι", " Άκυρο ", " AbortRetryIgnore » , καθώς και εικόνες για προειδοποιήσεις ή πληροφορίες . Η MsgBox μπορεί επίσης να εμφανίζει μια σύνδεση με ένα αρχείο βοήθειας . Φόρμα Παράδειγμα
Η

Γράφοντας ένα πολύ σύντομο πρόγραμμα της Visual Basic παρουσιάζει τη χρήση της συνάρτησης MsgBox . Το παράδειγμα εδώ δείχνει πώς ο προγραμματιστής μπορεί να προκαλέσει μια σειρά από ενέργειες για να συμβεί ανάλογα με την απόκριση του χρήστη . Η επίκληση της MsgBox μπορεί να ασχοληθεί με κρίσιμα λάθη , απλά προειδοποιεί το χρήστη για κάτι , ή να αφήσετε το άτομο να αποφασίσει αν θα continue.To δείτε στην πράξη , ανοίξτε το Basic 6.0 ή Visual λογισμικό Visual Basic.NET . Στη Visual Basic , δημιουργήστε ένα νέο πρόγραμμα , κάνοντας κλικ στο "Αρχείο ". Επιλέξτε " Νέο έργο " από την αναπτυσσόμενη λίστα και « Standard EXE » από τη λίστα προτύπων . Στο Visual Basic.NET ή Visual Basic 2008 Express Edition , να δημιουργήσετε ένα νέο έργο με τον ίδιο τρόπο , αλλά επιλέξτε το " Windows Forms Application " Δημιουργήστε ένα κουμπί εντολής και τρεις ετικέτες στη φόρμα κάνοντας κλικ και σύροντας αυτά τα εργαλεία από την εργαλειοθήκη . Κάντε κλικ σε κάθε ετικέτα στο κουτί Properties στα δεξιά , ενώ χρησιμοποιώντας την προβολή σχεδίασης και να διαγράψετε το κείμενο λεζάντας . Ακριβώς για να κάνουν το παράδειγμα λίγο πιο φιλική προς το χρήστη , αλλάξτε το κουμπί λεζάντα Command στη λίστα Ιδιότητες για να "Show Me ". Το έντυπο θα πρέπει να μοιάζει με την εικόνα εδώ .
Εικόνων Code Παράδειγμα
Η

Στη Visual Basic 6 κάντε κλικ στο "Προβολή " στο μενού και επιλέξτε "Κώδικας" από το drop down λίστα . Πληκτρολογήστε τις ακόλουθες εντολές ακριβώς όπως φαίνεται παρακάτω . Στο Visual Basic.NET , πατώντας το πλήκτρο " F7 " θα φέρει την προβολή κώδικα . ΣΗΜΕΙΩΣΗ : Η Visual Basic διεπαφή εισάγει αυτόματα τις καρτέλες σε κάποιες από αυτές τις γραμμές που δεν εμφανίζεται σωστά σε αυτό το άρθρο . Μην ανησυχείτε για αυτό . Η περιλαμβάνεται η εικόνα δείχνει τον τρόπο που η κωδικοποίηση θα εμφανιστούν στο λογισμικό .

Private Sub Command1_Click ( ) Dim Msg , Style , τον τίτλο , ResponseMsg = " Θέλετε να συνεχίσετε; " στυλ = vbAbortRetryIgnore + + vbCritical vbDefaultButton2 » Ορίστε buttons.Title = " MsgBox επίδειξης" Response = MsgBox ( Msg , Style , Τίτλος ) Αν Response = vbAbort ThenLabel1.Caption = " δεν έπρεπε να γίνει αυτό! " ElseIf Response = vbRetry ThenLabel2.Caption = "Επανάληψη όλα όσα θέλετε ? Τίποτα δεν θα λειτουργήσει " ! « Εκτελέστε κάποια action.Else : Label3.Caption = " Αυτή είναι η σωστή απάντηση ! " MsgBox ( " Πιέστε οποιοδήποτε πλήκτρο για να τελειώσει αυτό " ) Αν vbOK ThenEndEnd IfEnd IfEnd Sub

Πατώντας" F5 " είτε σε έκδοση θα τρέξει το πρόγραμμα και να επιδείξει την MsgBox όπως δημιουργήθηκε . Ανάλογα με τις ανάγκες της εφαρμογής , αντί να εμφανίζονται τα μηνύματα , το πρόγραμμα μπορεί να έχει συμβεί δράσεις , όπως το άνοιγμα νέων παραθύρων , προκαλώντας τις διαδικασίες διόρθωσης σφάλματος , κλείνοντας το πρόγραμμα ή μια σειρά από πράγματα που είναι δυνατές στο πλαίσιο του προγράμματος .

Η
εικόνων