مطلوب حل مشكلة حساب مبيعات لموظفين إذا كان إجمالي المبيعات أكبر من 6000فالنسبةللعمولة 5%وإذا لا
فلا يستحقو عمولة
أنا أسفة بس رأيكم حيكون فاصل في مسألة أكون أو لا أكون
مطلوب حل مشكلة حساب مبيعات لموظفين إذا كان إجمالي المبيعات أكبر من 6000فالنسبةللعمولة 5%وإذا لا
فلا يستحقو عمولة
أنا أسفة بس رأيكم حيكون فاصل في مسألة أكون أو لا أكون
بعد جمع المبيعات يقسم الرقم الى الحد الادنى و هو 6000 و تكون العمليه لاستخراج النسبه للموظف هكذا مثلا:
6000 /60-95
يكون بقي لدينا 5% و هو نصيب الموظف.
و الله اعلم.
هذا ما فهمته من سؤالك.
اذا اراد الله بعبد خيراً فقهه في دينه
((إياكم والغلو في الدين فإنما هلك من كان قبلكم بالغلو في الدين )).
( إن هذا الدين يسر ولن يشاد هذا الدين إلا غلبه فأوغلوا فيه برفق )
( هلك المتنطعون ، هلك المتنطعون ، هلك المتنطعون )
<span style='font-size:14pt;line-height:100%'>طريقة سريعة لحفظ كتاب الله العزيز</span>
<span style='font-size:14pt;line-height:100%'>تعرف على عباقرة الكذب</span>
شكرا على الرد لكن أنا المهم عندي صيغة المسألة صح ولا فيها خطأ عشان عليها يعتمد الحل وهذا المختلف علية بيني وبين أستاذة معهد
ولك جزيل الشكر
يعني كلمة حساب مبيعات صح ولا المفروض تكون المشكلة حساب نسبة عمولة للموظفين
تم تعديل هذه المشاركة بواسطة sndyana في 14 أبريل 2005 في 12:00
تحية وبعد...
الاخت سنديانا ..... الجواب كالتالي ..
لنفترض ان اجمالي المبيعات موضوع في text1 حلو
لنفترض ان العموله موضوعه في text2 حلو
الكود راح يكون كالتالي :
dim a,x as integer
a=text1.text نضع قيمة الاجمالي في متغير حلو
if a>=6000 then اذا كانت ال 6000 داخله في العمله فاستخدمي الكود هذا
واذا لم يكن داخل شيلي علامة = تمام
x=a*5% بالنسبه لعلامة % تأكدي منها قد يكون هناك بديل (أجيبك من مقهى لا يوجد فيه vb) لكن اذا جربت في الاله حاسبة تبع الويندوز راح يطلع صحيح وهومثلا 6000*(5%)= 300
text2.text=x
else
msgbox
"هذا الموظف لا يستحق العموله"
text2.text
=
"ليس له عموله"
end if
ان شاء الله ان هذا مقصودك والجواب صح :D
اذا فيه خطأ أو نقص العذر :(
المبرمج الطيب :)
تم تعديل هذه المشاركة بواسطة المبرمج الطيب في 14 أبريل 2005 في 12:07
إذا كان ترك الدين يعني تقدما ***** فيا نفس موتي قبل أن تتقدمي
اعط الفقير سمكة يشبع يوما * * * * علمه الصيد يشبع مدى الحياة
قتل امرئٍ في غابةٍ ***** جريمة لا تغتفـر
وقتل شعبٍ بأكمله ****** مسألةٌ فها نظر
حتى الكلاب إذا رأت يوماً فقيراً ماشياً *** نبحت عليه وكشرت أنيابها
بسم الله الرحمن الرحيم
أحب أن أحيي هذا المنتدى والقائمين عليه وجميع الأعضاء الكرام .
أود وضع هذا الكود البسيط الذي أعتقد أنه سيحل المسألة إن شاء الله - حسب فهمي للسؤال :
Private Sub Command1_Click() a = 24000 ' Sales Value MsgBox (a \ 6000) * (6000 * 5 / 100) ' commission End Sub
علما أن :
المتغير a هو قيمة المبيعات التي باعها الموظف .
التعبير (a\6000) يجد ناتج القسمة الصحيحة لقيمة المبيعات على 6000 .
التعبير (6000 * 5 / 100) يجد مقدار المكافأة على كل 6000 .
أرجو أن تكون اجابتي صحيحة .
والسلام عليكم
أخوكم البريشي .
********************* ******************** *********************
(( أشــهد أن لا اله الا الله ..... وأشهد أن محمد رسول الله ))
********************* ******************** *********************
لا تقـل من أيـن أبدأ
طـاعـة الله الـبدايـة
***
لا تقـل أين طـريـقي
شــرع الله الهـدايـة
***
لا تـقـل أيـن نعـيمي
جـنـة الله كـفـايـــــة
***
لا تقـل في الغـد أبدأ
ربمـــا تأتـي النهـايـــة
**************** **************** ****************
أنا أسفة جدا شكلوا مستواكم أعلى من سؤالي بكثير
أنا أبغى أعرف هل كلمة حساب مبيعات صح وهي المطلوبة
وهل حساب المبيعات =إجمالي المبيعات
أنا مبتدئة من تحت الصفر
بسم الله الرحمن الرحيم
اقتباسأنا أسفة جدا شكلوا مستواكم أعلى من سؤالي بكثير
نحن نحاول أن نجد الحل وبالنسبة لي فأنا لست أكثر من مبتدئ .
اقتباسأنا أبغى أعرف هل كلمة حساب مبيعات صح وهي المطلوبةوهل حساب المبيعات =إجمالي المبيعات
أعتقد أنه صحيح ، أرجو أن توضحي طبيعة عمل البرنامج والمطلوب بشكل أفضل ووجهة نظركي في هذه المعادلة .
بالنسبة للأخ المبرمج الطيب أعتذر على تعقيبي بعد ردك فالخبراء مثلك يجب أن نرفع لهم كل التحية . ولكني وجدت الحل السابق أبسط لذا أرفقته .
والسلام عليكم ورحمة الله وبركاته .
********************* ******************** *********************
(( أشــهد أن لا اله الا الله ..... وأشهد أن محمد رسول الله ))
********************* ******************** *********************
لا تقـل من أيـن أبدأ
طـاعـة الله الـبدايـة
***
لا تقـل أين طـريـقي
شــرع الله الهـدايـة
***
لا تـقـل أيـن نعـيمي
جـنـة الله كـفـايـــــة
***
لا تقـل في الغـد أبدأ
ربمـــا تأتـي النهـايـــة
**************** **************** ****************
بسم الله ويعد
الاخ العزيز البريشي ......في البداية مشكور على الاطراء الحلو :wacko:
الشيء الثاني المنتدى هذا ليس حكرا على أحد من الاعضاء فالاجابة الافضل هي التي تفرض نفسها .....
وانا كنت واضح في ردي الاول اني غير متأكد من كود العموله لاني أجيب من مقهى ....
وانت كانت اجابتك ليست الافضل فقط بل الاصح ......
وفقني الله واياك....
اخوك
المبرمج الطيب :)
إذا كان ترك الدين يعني تقدما ***** فيا نفس موتي قبل أن تتقدمي
اعط الفقير سمكة يشبع يوما * * * * علمه الصيد يشبع مدى الحياة
قتل امرئٍ في غابةٍ ***** جريمة لا تغتفـر
وقتل شعبٍ بأكمله ****** مسألةٌ فها نظر
حتى الكلاب إذا رأت يوماً فقيراً ماشياً *** نبحت عليه وكشرت أنيابها
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…