تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] مشكله فى VB 6 فى برنامج لطرح عددين عشريين
#1
Lightbulb 
السلام عليكم اعضاء المنتدى الكرام 
عندى مشكله فى كود ازاى يطرح عددين عشرين اى ان كان احدهما كبير او صغير 
مثلا 4.000 - 4.002 او العكس ارجوا الافاده لانى جربت كود val  مع تعريف المتغير و برضوا النتيجه مش صحيحه و لكم جزيل الشكر
الرد }}}}
تم الشكر بواسطة:
#2
Dim m As Double = "4.002" : Dim f As Double = "4.000 "
Dim g As Double = m - f
MsgBox(CSng(g))

دعواتك
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor
#3
اخى الكريم lion_Ksa مشكور على ردك
انا عايز البرنامج يطرح عددين عشريين مش الرقمين دول بس
بشرط انى يطرح الكبير من الصغير او الصغير من الكبير مع الاحتفاظ بالاشارات اثناء الطرح
يعنى لو ناتج الطرح موجب يفضل موجب و لو ناتج الطرح سالب يدى سالب و هكذا
الرد }}}}
تم الشكر بواسطة:
#4
تفضل أخي هذا المثال


الملفات المرفقة
.rar   ex.rar (الحجم : 1.38 ك ب / التحميلات : 27)

العاب من برمجتي  

Smile
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor
#5
انا عارف المثال ده اخى AGASHE و لكن لو عملت text box اللى فيه النتاتج طوله ثلاثة فقط سوف ترى الناتج مختلف و هى دى المشكله فى طرح عددين . انا عايز ناتج الطرح يكون ثلاثة decimal فقط و شكرا\
الرد }}}}
تم الشكر بواسطة:
#6
(27-08-15, 09:33 AM)Ayman2895 كتب : اخى الكريم lion_Ksa  مشكور على ردك
انا عايز البرنامج يطرح عددين عشريين مش الرقمين دول بس
بشرط انى يطرح الكبير من الصغير او الصغير من الكبير مع الاحتفاظ بالاشارات اثناء الطرح
يعنى لو ناتج الطرح موجب يفضل موجب و لو ناتج الطرح سالب يدى سالب و هكذا

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

المثال مرفق جرب طرح اي عددين

.zip   Ayman.zip (الحجم : 1.57 ك ب / التحميلات : 18)

اذا ما كان هذا هو المطلوب لا بأس وضح اكثر وأبشر
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor , Ahmed_Mansoor
#7
شكرا لك اخى الكريم انا بجد مش عارف اقولك ايه انتا فعلا ساعدتى كتيييييير
جزاء الله خيرا و جعله فى ميزان حسناتك و بارك لك فى علمك
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تشغيل برنامج الى ببرنامج خاص bidaya 6 97 11-01-18, 02:27 AM
آخر رد: bidaya
Question [vb6.0] هل يمكن عمل برنامج يعمل على نظام ماكنتوش؟؟ Microformt 1 68 23-11-17, 12:23 AM
آخر رد: Ahmed_Mansoor
  [سؤال] مساعدة لوتكرمتم في صنع برنامج تخفيضات Visual Basic 8 125 17-11-17, 12:00 AM
آخر رد: Visual Basic
  برنامج وارد ومصروفات abdohassan 7 300 12-09-17, 08:13 PM
آخر رد: abdohassan
Question [vb6.0] هل يوجد برنامج تنصيب يبحث ويجمع ملفات برنامجي المصنوع من فجوال بيسك ؟؟ Microformt 3 239 11-07-17, 04:34 PM
آخر رد: Microformt
  تحزيم برنامج بالVB6 متصل بقاعدة بيانات أكسس اسلام الكبابى 13 607 08-07-17, 12:21 PM
آخر رد: Ahmed_Mansoor
  [vb6.0] عمل برنامج شبكات ffmmffmm 0 188 29-06-17, 03:18 AM
آخر رد: ffmmffmm
  [vb6.0] مساعدة في فهم و تعلم صنع برنامج يعمل على سيرفر بقاعدة بيانات اكسس مربوطة بالادو larbihamri 6 312 10-06-17, 09:19 PM
آخر رد: Amir_alzubidy
  برنامج setup factory 9 norhan 3 972 05-06-17, 04:10 AM
آخر رد: عبد العزيز البسكري
  كود تشغيل برنامج اخر مرفق bidaya 2 208 28-05-17, 05:08 AM
آخر رد: bidaya

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم