Συνάρτηση MsgBox

Τελευταία δημοσίευση από το μέλος Admin στις 07-02-2007 11:49 πμ. Υπάρχουν 0 απαντήσεις.
Σελίδα 1 από 1 (1 εγγραφές)
Ταξινόμηση Δημοσιεύσεων: Προηγούμενο Επόμενο
  • 07-02-2007 11:49 πμ

    • Admin
    • Οι δημοφιλέστερες 10 δημοσιεύσεις
    • Μέλος από τις 05-24-2007
    • Δημοσιεύσεις 627

    Συνάρτηση MsgBox

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

    Σύνταξη

    MsgBox(prompt[, buttons] [, title] [, helpfile, context])

    Η σύνταξη της συνάρτησης MsgBox έχει τα εξής επώνυμα ορίσματα:

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

    Οι τιμές του ορίσματος buttons είναι:

    Σταθερά Τιμή Περιγραφή
    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 Αποκλειστικό παράθυρο συστήματος. Όλες οι εφαρμογές αναστέλλονται μέχρις ότου ο χρήστης αποκριθεί στο πλαίσιο μηνύματος.
    Η πρώτη ομάδα τιμών (0–5) περιγράφει τον αριθμό και τον τύπο των κουμπιών τα οποία εμφανίζονται στο παράθυρο διαλόγου. Η δεύτερη ομάδα (16, 32, 48, 64) περιγράφει το στυλ των εικονιδίων. Η τρίτη ομάδα (0, 256, 512) προσδιορίζει ποιο κουμπί είναι το προεπιλεγμένο. Τέλος, η τέταρτη ομάδα (0, 4096) προσδιορίζει τα χαρακτηριστικά που αφορούν στην αποκλειστικότητα του πλαισίου μηνύματος. Όταν προσθέτετε αριθμούς για να δημιουργήσετε τελική τιμή για το όρισμα buttons, χρησιμοποιήστε μόνο έναν αριθμό από κάθε ομάδα.

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

    Επιστρεφόμενες τιμές

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

    Όταν παρέχονται και το όρισμα helpfile και το όρισμα context, ο χρήστης μπορεί να πατήσει το πλήκτρο F1 για να εμφανίσει το θέμα της Βοήθειας που αντιστοιχεί στο context. Επίσης, ορισμένες κύριες εφαρμογές, όπως για παράδειγμα το Microsoft Excel, προσθέτουν αυτόματα ένα κουμπί Βοήθειας στο παράθυρο διαλόγου.
    Εάν το παράθυρο διαλόγου εμφανίζει το κουμπί Άκυρο, το πάτημα του πλήκτρου ESC έχει το ίδιο αποτέλεσμα με το κλικ στο κουμπί Άκυρο. Εάν το παράθυρο διαλόγου περιέχει το κουμπί Βοήθεια, παρέχεται  σχετική Βοήθεια για το παράθυρο διαλόγου. Πάντως, δεν επιστρέφεται καμία τιμή έως ότου ότου χρησιμοποιηθεί ένα από τα άλλα κουμπιά.

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

    Στο παράδειγμα αυτό χρησιμοποιείται η συνάρτηση MsgBox για να προβληθεί ένα μήνυμα κρίσιμου σφάλματος σε παράθυρο διαλόγου με κουμπιά Ναι και Όχι. Το κουμπί Όχι καθορίζεται ως η προεπιλεγμένη απάντηση. Η επιστρεφόμενη τιμή από τη συνάρτηση MsgBox εξαρτάται από το κουμπί που επιλέγει ο χρήστης. Γίνεται η υπόθεση ότι το ΕΠΙΔΕΙΞΗ.HLP είναι αρχείο Βοήθειας που περιέχει ένα θέμα με αριθμό περιεχομένου Βοήθειας ίσο με 1000.

    Dim Μήνυμα, Στυλ, Τίτλος, Βοήθεια, Θέμα, Απάντηση, Συμβολοσειρά
    Μήνυμα = "Θέλετε να συνεχίσετε;" ' Ορισμός μηνύματος.
    Στυλ = vbYesNo + vbCritical + vbDefaultButton2 ' Ορισμός κουμπιών.
    Τίτλος = "Επίδειξη MsgBox" ' Ορισμός τίτλου.
    Βοήθεια = "ΕΠΙΔΕΙΞΗ.HLP" ' Ορισμός αρχείου Βοήθειας.
    Θέμα = 1000 ' Ορισμός θέματος
      ' Εμφάνιση μηνύματος.
    Απάντηση = MsgBox(Μήνυμα, Στυλ, Τίτλος, Βοήθεια, Θέμα)
    If Απάντηση = vbYes Then ' Ο χρήστης επιλέγει Ναι.

    Συμβολοσειρά = "Ναι" ' Πραγματοποίηση κάποιας λειτουργίας.
    Else ' Ο χρήστης επιλέγει Όχι.
     Συμβολοσειρά = "Όχι" ' Πραγματοποίηση κάποιας λειτουργίας.
    End If

    KARPODINIS
    Δημοσίευση στην κατηγορία:
Σελίδα 1 από 1 (1 εγγραφές)