ما هي طريقة انشاء دالة او ( Function ) في نموذج ...؟

اخي الفاضل عبدالله

السلام عليكم ورحمة الله وبركاته

كما تعلم انه يوجد هناك طريقتين لعمل الوظيفه المطلوب تنفيذها

فهناك وظيفه عامه Public Function وتكون عادة في وحدة نمطية مستقله خارج النموذج

اي انها صالحه في اي مكان توضع فيه ويتم استدعاء هذه الوظيفه بالأمر Call ثم اسم الوظيفة كما هي مثل

Public Function MyCode()

'ضع الكود الخاص بك هنا


End Function

ويتم استدعاؤها بهذه الطريقة تحت زر الأمر مثل

Private Sub Command1_Click()
Call MyCode
End Sub

وايضا هناك وظيفة خاصة Private Function تكون خاصة بهذا النموذج مثل

Private Function MyCode()
'ضع الكود الخاص بك هنا

End Function

ويتم استدعاء هذه الوظيفه الخاصة في النموذج نفسه بهذه الطريقة

Private Sub Command1_Click()
MyCode
End Sub

طبعا الفرق بين الحالتين ان الأولى عامه تستخدم في اي مكان سواء النماذج او التقارير او الإستعلامات

اما الثانية فهي مقتصره على النموذج نفسه

بالتوفيق