تحديد عدد الاصناف في النموذج الفرعي الى 10

نفرض أن لديك فاتورة في النموذج جاهزة وتريد أن يكون

عدد الأصناف التي تأخذها الفاتورة لا يتعدى 10 أصناف مثلا .

نضع الكود في النموذج الفرعي في الحال ،،،

حدث في الحال الكود التالي :-

كود :

اقتباس

If Me.Recordset.RecordCount >= 10 Then

Me.AllowAdditions = False

Else

Me.AllowAdditions = True

End If

بحيث لايزيد عن عشرة اصناف أو مربعات ، محددة الى 10 ويمكن تغير من العشرة الى اي عدد تريدة

تغير بدل 10 Then الى خمسة مثلا 5 Then ،،،

منقول

مع خالص التحيات ،،،

عبدالمانع