الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

[ تمت الإجابة ]اريد الحصول على معادله تظهر الناتج الصحيح في النموذج

بدأه tamer137 في 21 فبراير 2008 · 8 رد · 957 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

ارجو المساعدة في هذا البرنامج

اريد عمل مقارنة في نموذج حيث عندي حقل به ناتج ومن المفترض ان لا يتعدى هذا الناتج عن نطاق معين

اريد كود او معادلة تعرفني ان كان ناتج الحقل الاول زائد ام ناقص

ارجو الرد لاهمية وعند اتمال البرنامج ان شاء الله فهو هدية مني لاحلى منتدى

____________3.rar

تم تعديل هذه المشاركة بواسطة tamer137 في 21 فبراير 2008 في 08:22

#2

تفضل أخى الكريم طلبك

HUp.rar

#3

شكراً لك عزيزي واخي hongylover

اولا : اشكرك على اهتمامك وسرعة ردك وجزاك الله خيرا

ثانيا : الناتج اللي اريده مختلف قليلا

ما اريده وضعته لك في مثال ثاني ووضعت لك صورة للناتج اللي اريده يكون عندي

718238745.jpg

الحقل الثاني سيكون حساب للحقل الاول

وشكرا لكل من سيقوم بالرد واعطائي الحل

اخوكم تامر

Thanks.rar

#4

اليس هناك مجيب

كل ماريده كود يحسب الفرق اللذي في الحقل الاول

حيث ان مثلاً الطاقة الممثلة يجب ان لاتقل في تركيبة العلف عن 3100 وان لاتزيد عن 3150 اريد معرف نسبة الزيادة او النقصان وان تظهر في الحقل الثاني

هذا ماريده بكل بساطه لكي يتسنى لي تعديل التركيبة بتعديل مكوناتها

ولك جزيل الشكر ،،،،،

تم تعديل هذه المشاركة بواسطة tamer137 في 22 فبراير 2008 في 10:48

#5

حبيبي أرجو أن تشرح ما تريد بكلمات علمية دقيقة و لغة رياضية مبتعدا عن الاختصار ليستنى لي مساعدتك

تم تعديل هذه المشاركة بواسطة simsim1983 في 22 فبراير 2008 في 23:55

#6

عزيزي الصورة بها حقلين

718238745.jpg

الحقل الاول يظهر به نتائج ظاهره امامك هذه النتائج هي عبارة تحليل لتركيبة

الحقل الثاني والذي اريد اضافته ان يعطيني النقص او الزيادة في الحقل اول

مثلاً الطاقة الممثلة يجب ان لا تقل عن 3100 والا زيد 3150 وهي عبارة عن القياس الاصلي الذي اريد تحقيقه

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

على القياس الاصلي .

هنا يأتي دور ( الحقل الثاني ) حيث سيحسب لي الفرق بين الناتج عندي الذي في (الحقل الاول)ويضعه في الحقل الثاني---- حيث انه اعطاني في الحقل الاول الطاقة (3379.60) وهنا هي عبارة عن زيادة في نسبة الطاقة (229.6) وهي نسبة خطيرة ما اريده هو.

مثال على ذلك في هذا المثال حقلين الحقل الاول الناتج عندي -- الحقل الثاني هو اللذي قام بالحساب على اساس (3100 - 3150) فوجد نسبة الزيادة عن ( 3150) هي عبارة عن (229.6) وقام بتغيير لونها الى اللون الاحمر هنا وجب علي ان اغير في التركيبة حتى اصل الى النتيجة المرجوه.

مثال على الزيادة

الحقل الاول-------------------------------الحقل الثاني

3379.60<------------------------------->(229.6)<--------------->هنا الفارق هو عبارة عن زيادة

مثال على النقص

الحقل الاول-------------------------------الحقل الثاني

3090<------------------------------------> (-10)<--------------->هنا الفارق هو عبارة عن نقص

مثال على تركيبة مضبوطه

الحقل الاول-------------------------------الحقل الثاني

3120<------------------------------------->(0)<--------------->هنا الطاقة الممثلة مبوطه

ارجو ان اكون قد استطعت توضيح مطلبي

وشكراً لك من ساهم في الاجابة

#7

السلام عليكم أخي الكريم

في مثالك المرفق نحن بحاجة لدالة تختبر الرقم ما إذا كان بين 3100 و3150

وهي الدالة في المثال المرفق Between أنظر الكود إن كان قيمة الدالة True

يعني صواب أي أن قيمة txt1 هي بين الرقمين السابقين - فاجعل txt2 صفرا ولون خلفيته بلون سماوي

أنظر الكود

Public Function Between(ByVal varTerm As Variant, ByVal firstBound As Variant, ByVal secBound As Variant) As Boolean
Dim vLowB, vUpB
	On Error GoTo ERR_Betw
	vLowB = IIf(firstBound > secBound, secBound, firstBound)
	vUpB = IIf(secBound < firstBound, firstBound, secBound)
	If varTerm > vLowB Then
		If varTerm < vUpB Then
			Between = True
		End If
	End If
ERR_Betw:
End Function

أما إن كان قيمة txt1 هي أصغر أو أكبر من الرقمين السابقين فاستخدم قاعدة Select Case

أنظر كود كوماند أحسب

If Between(Me.txt1, 3099, 3151) = True Then
Me.txt2 = 0
Me.txt2.BackColor = 15709952
End If
Select Case txt1
Case Is < 3100
txt2 = txt1 - 3100
txt2.BackColor = 255
Case Is > 3150
txt2 = txt1 - 3150
txt2.BackColor = 255
End Select

تفضل أخي الكريم : أنظر الشرط وتحقق في الكود وطبق المطلوب على أكثر من رقم وبالتوفيق إن شاء الله - أخوك إكسيرالحياة

EK_Between.rar

#8

شكراً لك اخي ekseer على هذه المساعدة التي كنت انتظهرها

وفقك الله ومع مزيد من الرقي ووالامتياز

اخوك تامر

#9

بسم الله الرحمن الرحيم

تمت الإجابة على الموضوع

إدارة الفريق العربي للبرمجة

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…