السلام عليكم ورحمة الله
ما هي تطبيقات الدالة Nz?
هنا مثال وجدته من في منتداكم الموقر:
Function checkid() As Long
Dim formid As Long, Tblmax As Long
formid = Me.id
Tblmax = Nz(DMax("[id]", "names"))
If formid <= Tblmax Then
checkid = Tblmax + 1
Else
checkid = formid
End If
End Functionأخي العزيز
تحية طيبة وبعد ،،،،،،،،،،،،
بخصوص الدالة Nz وظيفتها اعتبار الحقل التي لا توجد به بيانات صفر حيث لو جمعت أو طرحت رقم وفراغ يعطيك لا شيء ولكن هذه الدالة تعطي مجموع الرقم + صفر أو طرح رقم من صفر.
أنظر الاستعلام المرفق في هذه القاعدة
بالتوفيق
[يمين]
إذا كـان تـرك الـدين يعــنــي تقــدمــاً
فـيا نفــس مـوتــي قبــل أن تتقـدمــي
[/يمين]
مشكور ما قصرت المعلومة واضحة
وأسأل الله لك التوفيق في الدنيا والأخرة
بسم الله الرحمن الرحيم
تمت الإجابة على الموضوع
إدارة الفريق العربي للبرمجة
