pingo22 قام بنشر يوليو 21 مشاركة قام بنشر يوليو 21 السلام عليكم ورحمة الله وبركاته الاخوة الاعزاء اعمل على برنامج يحتوي على 3 حقول (نظام التعاقد - المهلة - التكاليف) حقل (نظام التعاقد) يحتوي على 3 اختيارات (ايجار - ايجار تمليكي - تمليك) وحقل (المهلة بالشهر) يكتب فيه عدد الاشهر المطلوبة مثل (1 او 2 او 3 ............الى اخره) المطلوب ان يتم احتساب حقل (التكاليف) بشكل تلقائي اي عند الاختيار في حقل (نظام التعاقد) ايجار تحسب ب 300 - واختيار ايجار تمليكي او تمليك تحسب ب 500 ويتم ضرب الناتج سواء 300 او 500 في حقل (المهلة بالشهر) سواء كان 1 او 2 او 3 حسب المكتوب اسف على الاطالة ولكم جزيل الشكر برنامج.accdb رابط هذا التعليق شارك More sharing options...
أفضل إجابة Foksh قام بنشر يوليو 21 أفضل إجابة مشاركة قام بنشر يوليو 21 (معدل) 53 دقائق مضت, pingo22 said: السلام عليكم ورحمة الله وبركاته الاخوة الاعزاء اعمل على برنامج يحتوي على 3 حقول (نظام التعاقد - المهلة - التكاليف) حقل (نظام التعاقد) يحتوي على 3 اختيارات (ايجار - ايجار تمليكي - تمليك) وحقل (المهلة بالشهر) يكتب فيه عدد الاشهر المطلوبة مثل (1 او 2 او 3 ............الى اخره) المطلوب ان يتم احتساب حقل (التكاليف) بشكل تلقائي اي عند الاختيار في حقل (نظام التعاقد) ايجار تحسب ب 300 - واختيار ايجار تمليكي او تمليك تحسب ب 500 ويتم ضرب الناتج سواء 300 او 500 في حقل (المهلة بالشهر) سواء كان 1 او 2 او 3 حسب المكتوب اسف على الاطالة ولكم جزيل الشكر برنامج.accdb 596 kB · 0 downloads وعليكم السلام ورحمة الله وبركاته ,, تم انشاء الدالة حساب التكاليف :- Private Sub CalculateTkalef() Dim contractType As String Dim months As Integer Dim costPerMonth As Currency Dim totalCost As Currency contractType = Me.elt3qod.Value months = Nz(Me.elmohla.Value, 0) Select Case contractType Case "ايجار" costPerMonth = 300 Case "ايجار تمليكي", "تمليك" costPerMonth = 500 Case Else costPerMonth = 0 End Select totalCost = costPerMonth * months Me.eltkalef.Value = totalCost End Sub واستدعائها في حدثي بعد التحديث لـلكومبوبوكس (elt3qod) ومربع النص (elmohla) . برنامج.accdb تم تعديل يوليو 21 بواسطه Foksh 1 رابط هذا التعليق شارك More sharing options...
pingo22 قام بنشر يوليو 21 الكاتب مشاركة قام بنشر يوليو 21 الاخ الغااااالي Foksh خااااالص شكري وتقديري تماااام هو المطلوب جزاك الله كل الخير وزادك من العلم 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان