כיצד למנוע בצורה פתוחה אם הרשומות לא להראות?
לפעמים יש צורך למנוע בצורה פתוחה אם יש רשומות להצגה, למשל כאשר אתה עושה שאילתה ולא אחת אין צורך, אנחנו לא צריכים להיות בצורה פתוחה מכיון שאין בידינו נתונים לתצוגה. אז מה אנחנו צריכים לבדוק הוא האם יש רשומות להצגה ואם אין להציג הודעה ו לעכב בצורה פתוחה. איך?
קל פשוט לשים את הקוד הבא במאפייני הטופס האירוע "לפתוח":
= 0 אז אם Form.RecordsetClone.RecordCount
MsgBox "לא נמצאו רשומות.", VbExclamation "שגיאה!"
DoCmd.Close acForm, "למצוא את הנתונים"
צא Sub
סוף אם
כדי לראות דוגמה להורדה: מניעת טופס פתוח
הדוגמה המוצג הינו מעולה.
אני מסכים עם הביקורת הקודמת!
פשוט ויעיל!
תודה!