الشاعر قام بنشر ديسمبر 17, 2013 مشاركة قام بنشر ديسمبر 17, 2013 (معدل) السلام عليكم أسعد الله أوقاتكم بكل خير ما هو الخطأ في هذا الكود ؟ If Judge1 Is Null Then Etqan1 = 0 ُElseif Judge1 Is Not Null Then Etqan1 = Ahkam0 End If End Sub تقبلوا تحياتي الشاعر تم تعديل ديسمبر 17, 2013 بواسطه الشاعر رابط هذا التعليق شارك More sharing options...
أبا عمر قام بنشر ديسمبر 17, 2013 مشاركة قام بنشر ديسمبر 17, 2013 (معدل) تفضل أخي الكريم If IsNull(me.Judge1) Then Etqan1 = 0 Else If IsNotNull(Me.Judge1) Then Etqan1 = Ahkam0 End If End If تم تعديل ديسمبر 17, 2013 بواسطه أبا عمر رابط هذا التعليق شارك More sharing options...
الشاعر قام بنشر ديسمبر 17, 2013 الكاتب مشاركة قام بنشر ديسمبر 17, 2013 (معدل) اللام عليكم أخي العزيز أبا عمر الله يعطيك العافية عند تطبيق الكود ظهرت لي رسالة الخطأ التالية في المرفقات للعلم الحقل Judge1 ليس حقل رقمي بل نصي تم تعديل ديسمبر 17, 2013 بواسطه الشاعر رابط هذا التعليق شارك More sharing options...
أبا عمر قام بنشر ديسمبر 17, 2013 مشاركة قام بنشر ديسمبر 17, 2013 أرفق مثال للتعديل عليه رابط هذا التعليق شارك More sharing options...
أبا عمر قام بنشر ديسمبر 17, 2013 مشاركة قام بنشر ديسمبر 17, 2013 تفضل أستاذي أعتذر لك عن الخطأ If IsNull(Me.Judge1) Then Etqan1 = 0 Else If Not IsNull(Me.Judge1) Then Etqan1 = Ahkam0 End If End If رابط هذا التعليق شارك More sharing options...
الشاعر قام بنشر ديسمبر 17, 2013 الكاتب مشاركة قام بنشر ديسمبر 17, 2013 إليكم المثال مع شرح المطلوب في المثال تحكيم مسابقة الحفظ.rar رابط هذا التعليق شارك More sharing options...
الشاعر قام بنشر ديسمبر 18, 2013 الكاتب مشاركة قام بنشر ديسمبر 18, 2013 (معدل) السلام عليكم أخي العزيز أبا عمر بارك الله فيك المطلوب الأول 100 % لو تكرمتم علينا بمساعدتنا في حل المطلوب الثاني في المثال تقبل تحياتي الشاعر تم تعديل ديسمبر 18, 2013 بواسطه الشاعر رابط هذا التعليق شارك More sharing options...
الشاعر قام بنشر ديسمبر 18, 2013 الكاتب مشاركة قام بنشر ديسمبر 18, 2013 حاولت ولم أفلح فما الخطأ في هذ الكود Private Sub Judge4_Exit(Cancel As Integer) Judge = Count([Judge1] + [Judge2] + [Judge3] + [Judge4]) End Sub رابط هذا التعليق شارك More sharing options...
الشاعر قام بنشر ديسمبر 19, 2013 الكاتب مشاركة قام بنشر ديسمبر 19, 2013 للرفع رابط هذا التعليق شارك More sharing options...
سمير1 قام بنشر ديسمبر 19, 2013 مشاركة قام بنشر ديسمبر 19, 2013 ارفق مثال وحدد مكان الكود المطلوب تعديله رابط هذا التعليق شارك More sharing options...
الشاعر قام بنشر ديسمبر 19, 2013 الكاتب مشاركة قام بنشر ديسمبر 19, 2013 السلام عليكم أخي العزيز سمير 1 شكرا لتفضلكم بالرد المثال مرفق في الأعلى كما أنني حللت المشكلة بطريقة ملتوية أضفت 4 حقول جديدة زقيمة الحقل مبنية على إنه إذا كان حقل TJudge1 فارغا فإن الحقل الجديد = صفر وإذا لم يكن فارغا فإن الحقل = 1 وجمعت قيم الحقول الجديدة بارك الله بكم مجددا تحياتي ( الشاعر) رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.