Συνάρτηση MsgBox

Ισχύει για
Access για Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

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

Σύνταξη

MsgBox(ερώτηση [, κουμπιά ] [, τίτλος ] [, αρχείο βοήθειας ] [, περιβάλλον ] )

Η σύνταξη της συνάρτησης MsgBox περιλαμβάνει τα παρακάτω ορίσματα:

Όρισμα Περιγραφή
Ερώτηση Υποχρεωτικό. Η παράσταση συμβολοσειράς εμφανίζεται ως μήνυμα στο παράθυρο διαλόγου. Το μέγιστο μήκος του μηνύματος είναι περίπου 1024 χαρακτήρες, ανάλογα με το πλάτος των χαρακτήρων που χρησιμοποιούνται. Εάν το μήνυμα αποτελείται από περισσότερες από μία γραμμές, μπορείτε να διαχωρίσετε τις γραμμές χρησιμοποιώντας έναν χαρακτήρα επαναφοράς (Chr(13)), ένα χαρακτήρα τροφοδοσίας γραμμής (Chr(10)) ή έναν χαρακτήρα επαναφοράς – συνδυασμό χαρακτήρων αλλαγής γραμμής (Chr(13) & Chr(10)) μεταξύ κάθε γραμμής.
κουμπιά Προαιρετικό. αριθμητική παράσταση που είναι το άθροισμα των τιμών που καθορίζει τον αριθμό και τον τύπο των κουμπιών που θα εμφανιστούν, το στυλ εικονιδίου που θα χρησιμοποιηθεί, την ταυτότητα του προεπιλεγμένου κουμπιού και την λειτουργικότητα του πλαισίου μηνύματος. Εάν παραλειφθεί, η προεπιλεγμένη τιμή για τα κουμπιά είναι 0.
Τίτλο Προαιρετικό. Η παράσταση συμβολοσειράς εμφανίζεται στη γραμμή τίτλου του παραθύρου διαλόγου. Εάν παραλείψετε τον τίτλο, το όνομα της εφαρμογής τοποθετείται στη γραμμή τίτλου.
αρχείο βοήθειας Προαιρετικό. Παράσταση συμβολοσειράς που προσδιορίζει το αρχείο Βοήθειας που θα χρησιμοποιηθεί για την παροχή βοήθειας ευαίσθητων πληροφοριών περιβάλλοντος για το παράθυρο διαλόγου. Εάν παρέχεται αρχείο helpfile, πρέπει επίσης να παρέχεται περιβάλλον.
Πλαίσιο Προαιρετικό. Αριθμητική παράσταση που είναι ο αριθμός περιβάλλοντος της Βοήθειας που έχει εκχωρηθεί στο κατάλληλο θέμα της Βοήθειας από τον συντάκτη της Βοήθειας. Εάν παρέχονται πληροφορίες περιβάλλοντος, πρέπει επίσης να παρέχεται αρχείο βοήθειας.

Ρυθμίσεις

Οι ρυθμίσεις του ορίσματος κουμπιώνείναι:

Σταθερά Τιμή Περιγραφή
vbOKOnly 0 Εμφάνιση μόνο του κουμπιού OK .
vbOKCancel 1 Εμφάνιση κουμπιών OK και Άκυρο .
vbAbortRetryIgnore 2 Κουμπιά "Εμφάνιση ματαιώσεων", "Επανάληψη" και "Παράβλεψη ".
vbYesNoCancel 3 Εμφάνιση των κουμπιών Ναι, Όχι και Άκυρο .
vbYesNo 4 Εμφάνιση κουμπιών Ναι και Όχι .
vbRetryCancel 5 Εμφάνιση κουμπιών Επανάληψη και Άκυρο .
vbCritical 16 Εμφάνιση εικονιδίου κρίσιμου μηνύματος .
vbQuestion 32 Εμφάνιση εικονιδίου προειδοποιητικού ερωτήματος .
vbExclamation 48 Εικονίδιο εμφάνισης προειδοποιητικού μηνύματος .
vbInformation 64 Εικονίδιο εμφανιζόμενου μηνύματος πληροφοριών .
vbDefaultButton1 0 Το πρώτο κουμπί είναι προεπιλεγμένο.
vbDefaultButton2 256 Το δεύτερο κουμπί είναι προεπιλεγμένο.
vbDefaultButton3 512 Το τρίτο κουμπί είναι προεπιλεγμένο.
vbDefaultButton4 768 Το τέταρτο κουμπί είναι προεπιλεγμένο.
vbApplicationModal 0 Ελλειπτική εφαρμογή, Ο χρήστης πρέπει να απαντήσει στο πλαίσιο μηνύματος πριν συνεχίσει τις εργασίες στην τρέχουσα εφαρμογή.
vbSystemModal 4096 Ελλειπτικό σύστημα, όλες οι εφαρμογές αναστέλλονται μέχρι ο χρήστης να απαντήσει στο πλαίσιο μηνύματος.
vbMsgBoxHelpButton 16384 Κουμπί "Προσθήκη βοήθειας" στο πλαίσιο μηνύματος
VbMsgBoxSetForeground 65536 Καθορίζει το παράθυρο του πλαισίου μηνύματος ως παράθυρο πρώτου πλάνου
vbMsgBoxRight 524288 Το κείμενο είναι στοιχισμένο δεξιά
vbMsgBoxRtlReading 1048576 Καθορίζει ότι το κείμενο θα πρέπει να εμφανίζεται ως ανάγνωση από δεξιά προς τα αριστερά στα εβραϊκά και τα αραβικά συστήματα

Η πρώτη ομάδα τιμών (0–5) περιγράφει τον αριθμό και τον τύπο των κουμπιών που εμφανίζονται στο παράθυρο διαλόγου. Η δεύτερη ομάδα (16, 32, 48, 64) περιγράφει το στυλ εικονιδίου. η τρίτη ομάδα (0, 256, 512) καθορίζει ποιο κουμπί είναι το προεπιλεγμένο. και η τέταρτη ομάδα (0, 4096) καθορίζει την λεπτομέρειες του πλαισίου μηνύματος. Όταν προσθέτετε αριθμούς για να δημιουργήσετε μια τελική τιμή για το όρισμα κουμπιά , χρησιμοποιήστε μόνο έναν αριθμό από κάθε ομάδα.

Σημείωση

Αυτές οι σταθερές καθορίζονται από Visual Basic for Applications. Ως αποτέλεσμα, τα ονόματα μπορούν να χρησιμοποιηθούν οπουδήποτε στον κωδικά σας αντί για τις πραγματικές τιμές.

Τιμές επιστροφής

Σταθερά Τιμή Περιγραφή
vbOK 1 OK
vbCancel 2 Άκυρο
vbAbort 3 Ματαίωση
vbRetry 4 Επανάληψη
vbIgnore 5 Αγνοήσει
vbYes 6 Ναι
vbNo 7 Όχι

Παρατηρήσεις

Όταν παρέχεται τόσο αρχείο βοήθειας όσο και περιβάλλον, ο χρήστης μπορεί να πατήσει το πλήκτρο F1 (Windows) ή HELP (macOS) για να δει το θέμα της Βοήθειας που αντιστοιχεί στο περιβάλλον. Ορισμένες εφαρμογές κεντρικού υπολογιστή, για παράδειγμα, το Microsoft Excel, προσθέτουν επίσης αυτόματα ένα κουμπί Βοήθειας στο παράθυρο διαλόγου.

Εάν το παράθυρο διαλόγου εμφανίζει ένα κουμπί Άκυρο , το πάτημα του πλήκτρου ESC έχει το ίδιο αποτέλεσμα με το κλικ στο κουμπί Άκυρο. Εάν το παράθυρο διαλόγου περιέχει ένα κουμπί Βοήθεια , παρέχεται σχετική βοήθεια για το παράθυρο διαλόγου. Ωστόσο, δεν επιστρέφεται καμία τιμή μέχρι να κάνετε κλικ σε ένα από τα άλλα κουμπιά.

Σημείωση

Για να καθορίσετε περισσότερα από το πρώτο επώνυμο όρισμα, πρέπει να χρησιμοποιήσετε το MsgBox σε μια παράσταση. Για να παραλείψετε ορισμένα ορίσματα θέσης, πρέπει να συμπεριλάβετε τον αντίστοιχο οριοθέτη με κόμματα.

Παράδειγμα

Σημείωση

Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA).

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση MsgBox για να εμφανίσει ένα μήνυμα κρίσιμου σφάλματος σε ένα παράθυρο διαλόγου με κουμπιά "Ναι" και "Όχι". Το κουμπί Όχι καθορίζεται ως η προεπιλεγμένη απάντηση. Η τιμή που επιστρέφει η συνάρτηση MsgBox εξαρτάται από το κουμπί που έχει επιλέξει ο χρήστης. Αυτό το παράδειγμα προϋποθέτει ότι DEMO.HLP πρόκειται για ένα αρχείο της Βοήθειας που περιέχει ένα θέμα με έναν αριθμό περιβάλλοντος της Βοήθειας ίσο με 1000.


Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue?"
Style = vbYesNo + vbCritical + vbDefaultButton2    
Title = "MsgBox Demonstration" 
Help = "DEMO.HLP"
Ctxt = 1000
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then    ' User chose Yes.
    MyString = "Yes"    ' Perform some action.
Else    ' User chose No.
    MyString = "No"    ' Perform some action.
End If