חל על
|
אובייקט Form |
|---|
|
אובייקט דוח |
באפשרותך להשתמש במאפיין מודאלי כדי לציין אם טופס או דוח נפתח כחלון מודאלי. כאשר טופס או דוח נפתח כחלון מודאלי, עליך לסגור את החלון לפני שתוכל להעביר את מוקד אל אובייקט אחר. קריאה/כתיבה Boolean.
ביטוי.מודאלי
ביטוי נדרש. ביטוי שמחזיר אחד מהאובייקטים ברשימה חל על.
הערות
המאפיין מודאלי משתמש בהגדרות הבאות.
|
הגדרה |
Visual Basic |
תיאור |
|---|---|---|
|
כן |
True |
הטופס או הדוח נפתח כחלון מודאלי. |
|
לא |
False |
(ברירת מחדל) הטופס נפתח כחלון לא מודאלי. |
באפשרותך להגדיר מאפיין זה על-ידי שימוש ב- גליון מאפיינים של הטופס או הדוח, מאקרו, או בקוד Visual Basic for Applications (VBA).
בעת פתיחת חלון מודאלי, חלונות אחרים ב- Access אינם זמינים עד שתסגור את הטופס (למרות שניתן לעבור לחלונות ביישומים אחרים). כדי להפוך תפריטים וסרגלי כלים ללא זמינים, בנוסף לחלונות אחרים, הגדר את שני המאפיינים מודאלי וחלון מוקפץ ל'כן'.
באפשרותך להשתמש במאפיין BorderStyle כדי לציין את סוג הגבול שיהיה לטופס. בדרך כלל, בטפסים מודאליים, המאפיין BorderStyle מוגדר ל'תיבת דו-שיח'.
עצה
באפשרותך להשתמש במאפיינים 'מודאלי', 'חלון מוקפץ' ו- BorderStyle כדי ליצור תיבת דו-שיח מותאמת אישית. באפשרותך להגדיר את המאפיינים 'מודאלי' ל'כן', 'חלון מוקפץ' ל'כן' ו- BorderStyle ל'תיבת דו-שיח' עבור תיבות דו-שיח מותאמות אישית.
הגדרת המאפיין מודאלי ל'כן' הופכת את הטופס למודאלי רק כאשר אתה:
-
פותח אותו בתצוגת 'טופס' דרך חלונית הניווט.
-
פותח אותו בתצוגת 'טופס' באמצעות מאקרו או קוד VBA.
-
עובר מ- תצוגת עיצוב לתצוגת 'טופס'.
כאשר הטופס מודאלי, לא ניתן לעבור ל- תצוגת גליון נתונים מתצוגת 'טופס', למרות שניתן לעבור לתצוגת 'עיצוב' ולאחר מכן לתצוגת 'גליון נתונים'.
הטופס אינו מודאלי בתצוגת 'עיצוב' או בתצוגת' גליון נתונים' וגם אינו מודאלי אם אתה עובר מתצוגת 'גליון נתונים' לתצוגת 'טופס'.
הערה: באפשרותך להשתמש בהגדרה 'תיבת דו-שיח' של ארגומנט פעולת 'מצב חלון' של הפעולה OpenForm כדי לפתוח טופס שהמאפיינים מודאלי וחלון מוקפץ שלו מוגדרים ל'כן'.
דוגמה
כדי להחזיר את הערך של המאפיין מודאלי עבור הטופס "הזנת הזמנות", באפשרותך לבצע את הפעולות הבאות:
Dim b As Booleanb = Forms("Order Entry").Modal
כדי להגדיר את הערך של המאפיין מודאלי באפשרותך לבצע את הפעולות הבאות:
Forms("Order Entry").Modal = True
