كيف أنشئ وحده نمطيه؟؟؟

أخي سعد الغالي/

سبب وجود هذه الأنماط لتسهيل عملية فصل الأكواد عن بعض، وبالإضافة إلى تسهيل أعاده أستخدام الكود في أكثر من برنامج مرات متعددة. وعند إنشاء أي وحدة داخل Access يتم استدعاء الدالة الموجود في الوحدة من أي فورم أخر.

وتحتوي الوحدات على عدة أجزاء: تعريف المتغيرات + Sub + Function

مثال بسيط لوحدة نمطية

Dim a as String

sub xyz()
أكتب ألي تبي هنا حيث ينفذ مجرد استدعاء xyz
end sub

function aaa()
نفس الشي تكتب هنا ما تريد من الكود، وما يخنلف هنا عن سابقتها هي أنها دالة ترجع بقيمة 
end function

هذا مثال جدا جدا بسيط وليس شاملا ولكن يعطي صوره عن تركبية الدالة ومكوناتها

ولك جزيل الشكر أخي الكريم سعد