منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[vb6.0] مشكله فى VB 6 فى برنامج لطرح عددين عشريين - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [vb6.0] مشكله فى VB 6 فى برنامج لطرح عددين عشريين (/showthread.php?tid=13043)



مشكله فى VB 6 فى برنامج لطرح عددين عشريين - Ayman2895 - 26-08-15

السلام عليكم اعضاء المنتدى الكرام 
عندى مشكله فى كود ازاى يطرح عددين عشرين اى ان كان احدهما كبير او صغير 
مثلا 4.000 - 4.002 او العكس ارجوا الافاده لانى جربت كود val  مع تعريف المتغير و برضوا النتيجه مش صحيحه و لكم جزيل الشكر


RE: مشكله فى VB 6 فى برنامج لطرح عددين عشريين - أبو عمر - 26-08-15

Dim m As Double = "4.002" : Dim f As Double = "4.000 "
Dim g As Double = m - f
MsgBox(CSng(g))

دعواتك


RE: مشكله فى VB 6 فى برنامج لطرح عددين عشريين - Ayman2895 - 27-08-15

اخى الكريم lion_Ksa مشكور على ردك
انا عايز البرنامج يطرح عددين عشريين مش الرقمين دول بس
بشرط انى يطرح الكبير من الصغير او الصغير من الكبير مع الاحتفاظ بالاشارات اثناء الطرح
يعنى لو ناتج الطرح موجب يفضل موجب و لو ناتج الطرح سالب يدى سالب و هكذا


RE: مشكله فى VB 6 فى برنامج لطرح عددين عشريين - AGASHE - 27-08-15

تفضل أخي هذا المثال


RE: مشكله فى VB 6 فى برنامج لطرح عددين عشريين - Ayman2895 - 06-09-15

انا عارف المثال ده اخى AGASHE و لكن لو عملت text box اللى فيه النتاتج طوله ثلاثة فقط سوف ترى الناتج مختلف و هى دى المشكله فى طرح عددين . انا عايز ناتج الطرح يكون ثلاثة decimal فقط و شكرا\


RE: مشكله فى VB 6 فى برنامج لطرح عددين عشريين - أبو عمر - 07-09-15

(27-08-15, 09:33 AM)Ayman2895 كتب : اخى الكريم lion_Ksa  مشكور على ردك
انا عايز البرنامج يطرح عددين عشريين مش الرقمين دول بس
بشرط انى يطرح الكبير من الصغير او الصغير من الكبير مع الاحتفاظ بالاشارات اثناء الطرح
يعنى لو ناتج الطرح موجب يفضل موجب و لو ناتج الطرح سالب يدى سالب و هكذا

انت لو جربت تحط بدل الارقام في الكود اعلاه text1 & text2 & text3
كنت وصلت للنتيجة

المثال مرفق جرب طرح اي عددين
[attachment=7860]

اذا ما كان هذا هو المطلوب لا بأس وضح اكثر وأبشر


RE: مشكله فى VB 6 فى برنامج لطرح عددين عشريين - Ayman2895 - 09-09-15

شكرا لك اخى الكريم انا بجد مش عارف اقولك ايه انتا فعلا ساعدتى كتيييييير
جزاء الله خيرا و جعله فى ميزان حسناتك و بارك لك فى علمك