تعریف رویدادی از یک آبجکت در یک ماژول یا کلاس برای تمامی آبجکتها

[ARData]

سلام
آیا امکانش هست که برای رویداد onload تمامی فرم ها ، ماژول یا کلاسی تعریف کرد که شامل حال تمامی فرم ها بشه ؟ مثلا در رویداد onload فرم یه مسیج باکسی رو نمایش بده ... مثال زیر فرضی می باشد و ماهیت اجرایی ندارد :
Public Sub Form_Load()
MsgBox "Salam"
End Sub
'یا
Global Form_Load()
MsgBox "Salam"
End Sub
بدون اینکه در رویداد onload فرم ها کدی نوشته شود کنترل این رویداد توسط ماژول نوشته شده انجام شود . :متفکر:

[amirzazadeh]

سلام
طبيعتا وقتي رويدادي تحريك نشه كدي هم اجرا نخواهد شد.

[ARData]

درسته .... خوب این مسیج باکس رو می توان برای زمانی که که وارد برنامه اکسس میشیم به اجرا در بیاریم .... ؟

[mazoolagh]

تنها کاری که میتونین بکنین این هست که با کد تک تک فرم هایی رو که میخواین در حالت طراحی باز کنین و PROCEDURE مورد نظرتون رو به پراپرتی onload. نسبت بدین و فرم رو ذخیره کنین.

فقط در نظر داشته باشین این نوع مسائل وقتی پیش میان نشون دهنده این هست که طراحی مشکل اساسی داره!

[Abbas Amiri]

باتوجه به مثال شما راه جناب mazoolagh بهترین است اما چنانچه کدها طولانی شود بهترین را ایجاد یک فانکشن (مثلا Public Function OnLoad ) وتایپ کدها درآن وسپس درتب ایونت برای خصوصیت OnLoad مقدار =()OnLoad را قراردهید.