طلب مساعدة في كود لاجراء عمليات حسابية من خلال الفورم

[زياد عبد الجليل]

السلام على جميع الاخوة الافاضل :

اطلب مساعدة جميع الخبراء في انشاء اكواد لاجراء عمليات حسابية من خلال الفورم(عمليات القسمة- الجمع- الطرح- الضرب)  لمعرفة المطلوب بدقة ارجو الاطلاع على الملف المرفق... و لكم مني فائق عبارات الشكر و الامتنان.

 

عمليات حسابية.rar

[طلعت محمد حسن]

السلام عليكم

اخي الكريم زياد شاهد المرفق هل هذا ما تقصد به بالعمليات الحسابية داخل الفورم

 

اقبل تحياتي واحترامي

عمليات حسابية.rar

[زياد عبد الجليل]

شكرا اخي طلعت هذا هو المطلوب بالضبط...بارك الله فيك

[Basha Egypt]

مشكور اخى الكريم وجزاك الله خيرا

اسمح لى بسؤال هل يمكن اضافة الجمع له حيث انه قسمه وضرب وطرح فقط

مع خالص الشكر والتقدير

 

تم تعديل أكتوبر 2, 2016 بواسطه Basha Egypt

[زياد عبد الجليل]

اخي باشا مصر يوجد كود الجمع اصلا في الملف 

على العموم اليك كود الجمع

TextBox8.Value = Val(TextBox1) + Val(TextBox2) + Val(TextBox3) + Val(TextBox4) + Val(TextBox5) + Val(TextBox6)

وشكرا

[طلعت محمد حسن]

الشكر لله وحدة والحمد لله الذي على يدة تتم الصالحات .

[زياد عبد الجليل]

استاذ طلعت لو تكرمت هناك مشكلة صغيرة ارجو ان تجد لها الحل لاني حاولت و لم انجح 

1- المشكلة هي في عملية القسمة : عند وضع علامات بالفاصلة مثلا 10.50 و 12.50 و 13.50 ....الخ نجد ان هناك فرق في ما بعد الفاصلة  بين الحساب بالالة الحاسبة  و الحساب باليوزرفورم  هل يمكن جعل الكود متطابق في النتيجة بين الحساب بالالة الحاسبة و الفورم...و لك مني جزيل الشكر و العرفان.

[طلعت محمد حسن]

اخي زياد لو سمحت اعطيني مثال عددين اقسمهم على بعض لاني جربت النتائج وكلها صحيحة

[زياد عبد الجليل]

مثلا انا جربت في تاكس1 =10.50--تاكس بوكس2 =13.50تاكس بوكس3= 12.50 يكون الناتج 36.50 اقسمها على تاكس بوكس 7 وتكون قيمته 18 يكون الناتج بالفورم 2 بالضبط و بالالة الحاسبة 2.02

وانا اريد ان تكون القيمتين متطابقتين ...شكرا استاذ طلعت مرة اخرى على ردك السريع و مروك الطيب .

[طلعت محمد حسن]

شاهد اخي زياد هذه النتيجة في جهازي ولم اقم بتغير شيئ بالبرنامج وهي نفس النتيجة بالة الحاسبة .

تم تعديل أكتوبر 2, 2016 بواسطه طلعت محمد حسن

[زياد عبد الجليل]

شكرا استاذ طلعت الضاهر ان المشكل عندي وقد علمت السبب  وهي ضهور النتيجة 36.5 بدلا من النقطة الفاصلة تضهر 36,5 اي "," هي سبب تغير النتيجة وقد جربت كتابة 36.5 بالنقطة الفاصلة مباشرة في التاكس بوكس 8 و قسمتها على 18 وكانت النتيجة صحيحة 100/100 (2.0277)...الان أدركت ان المشكلة تكمن في اعدادات النظام و ذهبت الى اعدادات اللغة ومن paramétres  

supplémentaires

استبدلت  الفاصلة بالنقطة 

شكرا لك استاذ طلعت و بارك الله فيك وجعله في ميزان حسناتك

[Basha Egypt]

في 10/2/2016 at 16:58, زياد عبد الجليل said:

اخي باشا مصر يوجد كود الجمع اصلا في الملف 

على العموم اليك كود الجمع

TextBox8.Value = Val(TextBox1) + Val(TextBox2) + Val(TextBox3) + Val(TextBox4) + Val(TextBox5) + Val(TextBox6)

وشكرا

اخى الفاضل شكرا على ردك الكريم

الكود موجود ولكن لايظهر فى صفحة الادخال كخانات مثل القسمه والطرح والضرب كالصوره المرفقه - وما أقصده هو ظهوره بهذه الصفحه

تقبل تحياتى