Applies ToAccess של Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

במסד נתונים Access שולחני, הפונקציה MsgBox מציגה הודעה בתיבת דו-שיח, מחכה שהמשתמש ילחץ על לחצן ויחזיר מספר שלם המציין על איזה לחצן המשתמש לחץ.

תחביר

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

תחביר הפונקציה MsgBox מכיל את הארגומנטים הבאים:

ארגומנט

תיאור

בשורת

נדרש. ביטוי מחרוזת המוצג כהודעה בתיבת הדו-שיח. אורך הבקשה המרבי הוא כ- 1024 תווים, בהתאם לרוחב התווים הנמצאים בשימוש. אם בקשה מכילה יותר משורה אחת, באפשרותך להפריד בין הקווים באמצעות תו החזרת גררה (Chr(13)), תו הזנה בשורות (Chr(10)) או החזרת גררה – שילוב תווים בהזנה בשורות (Chr(13) & Chr(10)) בין כל שורה.

לחצנים

אופציונלי. ביטוי מספרי שהוא סכום הערכים המציין את המספר וסוג הלחצנים להצגה, סגנון הסמל שבו יש להשתמש, הזהות של לחצן ברירת המחדל והמודאליות של תיבת ההודעה. אם הוא מושמט, ערך ברירת המחדל עבור הלחצנים הוא 0.

כותרת

אופציונלי. ביטוי מחרוזת המוצג בפס הכותרת של תיבת הדו-שיח. אם השמטת את הכותרת, שם היישום ימוקם בפס הכותרת.

קובץ helpfile

אופציונלי. ביטוי מחרוזת המזהה את קובץ העזרה שבו יש להשתמש כדי לספק עזרה תלוית הקשר עבור תיבת הדו-שיח. אם סופק קובץ helpfile , יש לספק גם הקשר.

הקשר

אופציונלי. ביטוי מספרי שהוא מספר הקשר העזרה שהוקצה לנושא העזרה המתאים על-ידי מחבר העזרה. אם סופק הקשר, יש לספק גם קובץ helpfile.

הגדרות

הלחצנים ארגומנט הן:

קבוע

Value

תיאור

vbOKOnly

0

הצג לחצן אישור בלבד.

vbOKביטול

1

הלחצנים 'אישור' ו'ביטול' מוצגים.

vbAbortRetryIgnore

2

הלחצנים 'בטל', 'נסה שנית' ו'התעלם' מוצגים.

vbYesNoביטול

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. כתוצאה מכך, ניתן להשתמש בשמות בכל מקום בקוד במקום הערכים בפועל.

ערכי החזרה

קבוע

Value

תיאור

vbOK

1

אישור

vbביטול

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

זקוק לעזרה נוספת?

מעוניין באפשרויות נוספות?

גלה את יתרונות המנוי, עיין בקורסי הדרכה, למד כיצד לאבטח את המכשיר שלך ועוד.

קהילות עוזרות לך לשאול שאלות ולהשיב עליהן, לתת משוב ולשמוע ממומחים בעלי ידע עשיר.