Πρόταση MsgBox

Εμφανίζει ένα πλαίσιο διαλόγου που περιέχει ένα μήνυμα.

Σύνταξη:


   MsgBox prompt As String [,buttons = MB_OK [,title As String]]
   response = MsgBox( prompt As String [,buttons = MB_OK [,title As String]])

Παράμετροι:

prompt (προτροπή): Η έκφραση συμβολοσειράς εμφανίζεται ως μήνυμα στο πλαίσιο διαλόγου. Οι αλλαγές γραμμής μπορούν να εισαχθούν με το Chr$(13).

title (τίτλος): Έκφραση συμβολοσειράς που εμφανίζεται στη γραμμή τίτλου του διαλόγου. Εάν παραλειφθεί, η γραμμή τίτλου εμφανίζει το όνομα της αντίστοιχης εφαρμογής.

buttons (πλήκτρα): Οποιαδήποτε ακέραια έκφραση που καθορίζει τον τύπο διαλόγου, καθώς και τον αριθμό και τον τύπο των πλήκτρων που θα εμφανίζονται και τον τύπο εικονιδίου. Τα buttons αντιπροσωπεύουν έναν συνδυασμό μοτίβων bit, δηλαδή, ένας συνδυασμός στοιχείων μπορεί να οριστεί προσθέτοντας τις αντίστοιχες τιμές τους:

Επώνυμη σταθερά	Ακέραιη τιμή	Ορισμός
MB_OK	0	Εμφάνιση μόνο του πλήκτρου Εντάξει.
MB_OKCANCEL	1	Εμφάνιση των πλήκτρων Εντάξει και Άκυρο.
MB_ABORTRETRYIGNORE	2	Εμφάνιση των πλήκτρων Ματαίωση, Επανάληψη και Παράβλεψη.
MB_YESNOCANCEL	3	Εμφάνιση των πλήκτρων Ναι, Όχι και Άκυρο.
MB_YESNO	4	Εμφάνιση των πλήκτρων Ναι και Όχι.
MB_RETRYCANCEL	5	Εμφάνιση των πλήκτρων Επανάληψη και Άκυρο.
MB_ICONSTOP	16	Προσθήκη του εικονιδίου Διακοπή στον διάλογο.
MB_ICONQUESTION	32	Προσθήκη του εικονιδίου Ερώτηση στον διάλογο.
MB_ICONEXCLAMATION	48	Προσθήκη του εικονιδίου Θαυμαστικό στον διάλογο.
MB_ICONINFORMATION	64	Προσθήκη του εικονιδίου πληροφορίες στον διάλογο.
	128	Το πρώτο πλήκτρο του διάλογου είναι το προεπιλεγμένο πλήκτρο.
MB_DEFBUTTON2	256	Το δεύτερο πλήκτρο του διάλογου είναι το προεπιλεγμένο πλήκτρο.
MB_DEFBUTTON3	512	Το τρίτο πλήκτρο του διάλογου είναι το προεπιλεγμένο πλήκτρο.

Κωδικοί σφάλματος:

5 Άκυρη κλήση διαδικασίας

Παράδειγμα:


Sub ExampleMsgBox
 Const sText1 = "Προέκυψε απρόσμενο σφάλμα."
 Const sText2 = "Ωστόσο, η εκτέλεση του προγράμματος θα συνεχιστεί."
 Const sText3 = "Σφάλμα"
 MsgBox(sText1 + Chr(13) + sText2,16,sText3)
 MsgBox(sText1 + Chr(13) + sText2, MB_ICONSTOP, sText3)
End Sub