תפריט מותאם אישית
זהו סוג של תפריט מאפשר לנו לחסוך זמן, שורות קוד ו סידור טוב יותר במונחים של צורות פתוחות, שכן עם התפריט הזה רק צריך טופס פתוח. בנוסף לצמצום במספר צורות פתוחות גם מקטין את מספר הכפתורים בתפריט לפתוח כל טופס.
סוג זה של התפריט, בוודאי שקיים כבר זמן מה, והוא כבר בשימוש על ידי משתמשים רבים של Access.
אז איפה בתפריט זה?
הבה ניצור את התפריט באמצעות תיבה משולבת הכוללת את כל הטפסים אנו מתכננים לפתוח דרכו. כאשר אתה בוחר באפשרות מתוך התיבה המשולבת בטופס הבקשה מוצג בתוך טופס משנה. ואז אנחנו מתחילים לעשות את הצעד תפריט אחר צעד.
1 - בואו ליצור טבלה שבה נוכל לאחסן שם אתה רוצה לתת כל צורה שם הטופס שתיפתח. בדוגמה יצרתי "tblmenu" את הטבלה עם בתחומים הבאים:
שדה סוג
טקסט Nomedomenu -> שם יהיה לראות התפריט (משולבת מסגרת)
ליצור טקסט -> שם הטופס שיפתח
לאחר הנתונים שהוצגו בדוגמה הם:
NomedoMenu טופס
חשבונות Form1
פיקדונות Form2
תנועות formulario3
החשבון תיבת formulario4
החשבון חשבון formulario5
חלץ formulario6
2 - לאחר מכן אנו יוצרים שאילתה מהטבלה הקודמת:
Tblmenu בחר את הטבלה ולאחר מכן בחר את שני התחומים בהם בחרנו עבור בסדר עולה מיין nomedomenu להיות קל יותר למצוא את התפריט כמה וכמה פעמים כאשר אנו רוצים לפתוח טפסים. לשאלה הזאת קראתי "CsMenu".
3 - הבה ניצור 'תפריט' צורה, כלומר לבחור צורה חדשה בתצוגת עיצוב. לאחר מכן אנו יוצרים תיבה משולבת ולשנות את המאפיינים הבאים:
- מספר עמודים: 2
- רוחב העמודות: 1cm, 0cm;
- מקור של הקו: csmenu (שהוא שמו של שאילתה שנוצרה בסעיף הקודם)
4 - באותה צורה ניצור טופס משנה בטופס מאוגד של הראשי (בדוגמה התקשרתי menuquadro). זהו טופס זה שיהיה פתוח כל הטפסים לבחור מהתפריט (תיבה משולבת).
5 - עכשיו ליצור מודול זה יאפשר לנו לפתוח את התפריט שנבחר בתיבה משולבת של טופס משנה.
יצרנו מודול (אשר קראתי "abrirmenu ') ולהדביק את הקוד הבא:
פונקציה AtivarMenu אישי (Combmenu ComboBox, subabrir טופס משנה)
Abrirform כמחרוזת דים
= Abrirform Combmenu.Column (1)
subabrir.SourceObject = abrirform
subabrir.LinkChildFields = ""
subabrir.LinkMasterFields = ""
סוף פונקציה
אחרי הולך המאפיינים של התיבה המשולבת בתפריט את הטופס לאחר האירוע עדכון לשים יצר פונקציה: ativarmenu = ([תפריט], [menuquadro]), כי "תפריט" הוא שמו של התיבה המשולבת ו 'menuquadro " שמו של טופס משנה.
ולבסוף תפריט מוכן לשימוש. רק לנסות להשתמש בו. אני מקווה שאתה נהנה זה עצה.
הורדה: תפריט
מתחת לתמונה של התפריט.
תפריט מותאם אישית
שמתי את הכפתור על ביטול Form2 ואת רוצה על ידי לחיצה על הגב טופס משנה למיקום המקורי, כלומר, להישאר ריק וריק, כמו גם עם המשולבת. כיצד לבנות את התפקיד הזה?
תודה,
פיטר
שלום פיטר,
לא ממש מבין מה לעשות. ממה שאני מבין אם על ידי כפתור על טופס משנה שגורם את התפריט כדי לחזור למצב הראשוני, נכון?
נכון מאוד! עם סיום המבצע, חזרה טופס למצב הראשוני, וכן משולבת.
אסיר תודה.
זה אפשרי, לעשות את התפריט, אבל באמצעות מקשי קיצור לפי התפריט הקודם.
הצליח להפוך את התפריט טוב ביצוע השלבים המתוארים כאן, אבל הטפסים שלי יש בתיבות משולבות בצורות ובין הקשורות לעבודה, אך כאשר צעד על ההפעלה להפסיק formulariomenu. מה אני יכול לעשות?
אני לא יודע איך לבקש יותר רציתי לדעת איך לעשות
faser לקובץ ההפעלה ב PROAMA poelomenos trabale עם גישה שעות ו מחיר
הצג בול האדם, כמו למשל, או כל טיפ, כי ללכת עם כפתורים במקום משולבת.
לחבק
אדם איך לעשות את זה רק כי במקום משולבת עם כפתורים?
אני צריך עזרה: האם מערכת של מסד נתונים של Access בתוך בעת הצורך עבור אדם מסוים בצורה תיבת סימון בוחר NO, כתב PHOTO פתוח.
החברים אהב יותר הטיפ הזה, אבל לא קיבלתי הצלחה ... יכול לשלוח לי צעד אחר צעד? אני לא יודע הרבה על הגישה אבל יש לי כוח רצון, אם אתה יכול לעזור לי עם זה אני אהיה אסיר תודה.
ספק שלי כאן היא, איך אני יכול לשמור את הטופס עם שני שמות שונים?
3 - הבה ניצור 'תפריט' צורה, כלומר לבחור צורה חדשה בתצוגת עיצוב. לאחר מכן אנו יוצרים תיבה משולבת ולשנות את המאפיינים הבאים:
- מספר עמודים: 2
- רוחב העמודות: 1cm, 0cm;
- מקור של הקו: csmenu (שהוא שמו של שאילתה שנוצרה בסעיף הקודם)
4 - באותה צורה ניצור טופס משנה בטופס מאוגד של הראשי (בדוגמה התקשרתי menuquadro). זה הטופס שיהיה פתוח לכל
צורות לבחור מהתפריט (תיבה משולבת).
שלום,
מצאתי את התפריט פנטסטי שלך, רק רציתי לפתוח, כמו גם דוחות וכאשר אני שם את השם בדו"ח שלי לא עבד, יכול לתת רמז?
שרירי הבטן,
קלאודיו