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

תחביר

MsgBox ( בקשה [, לחצנים ] [, title ] [, קובץ עזרה ] [, הקשר ] )

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

ארגומנט

תיאור

שורת

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

לחצנים

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

כותרת

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

קובץ עזרה

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

הקשר

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


הגדרות

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

קבוע

ערך

תיאור

vbOKOnly

0

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

vbOKCancel

1

הצגת לחצני אישור וביטול .

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

מציין שהטקסט אמור להופיע כקריאה מימין לשמאל במערכות עברית וערבית


עצה:  ב-Access 2010, בונה הביטויים כולל את IntelliSense, כך שתוכל לראות אילו ארגומנטים הביטוי שלך דורש. 

קבוצת הערכים הראשונה (0 – 5) מתארת את המספר ואת סוג הלחצנים המוצגים בתיבת הדו; הקבוצה השניה (16, 32, 48, 64) מתארת את סגנון הסמל; הקבוצה השלישית (0, 256, 512) קובעת איזה לחצן הוא ברירת המחדל; והקבוצה הרביעית (0, 4096) קובעת את המודאליות של תיבת ההודעה. בעת הוספת מספרים כדי ליצור ערך סופי עבור הארגומנט לחצנים , השתמש במספר אחד בלבד מכל קבוצה.

הערה: קבועים אלה מצוינים על-ידי Visual Basic for Applications. כתוצאה מכך, ניתן להשתמש בשמות בכל מקום בקוד במקום הערכים הממשיים.

החזרת ערכים

קבוע

ערך

תיאור

vbOK

1

אישור

vbCancel

2

ביטול

vbAbort

3

בטל

vbRetry

4

נסה שנית

vbIgnore

5

התעלם

vbYes

6

כן

vbNo

7

לא


הערות

כאשר מוצגים גם קובץ העזרהוההקשר , המשתמש יכול להקיש F1 (Windows) או עזרה (Macintosh) כדי להציג את נושא העזרה התואם להקשר. חלק מיישומי המארחים, לדוגמה, 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

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

הרחב את הכישורים שלך
סייר בהדרכה
קבל תכונות חדשות לפני כולם
הצטרף למשתתפי Microsoft Office Insider

האם מידע זה היה שימושי?

עד כמה אתם מרוצים מאיכות השפה?
מה השפיע על החוויה שלכם?

תודה על המשוב!

×