تقييم الموضوع :
  • 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 ك ب / التحميلات : 13)

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

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 ك ب / التحميلات : 9)

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كود تشغيل برنامج اخر مرفق bidaya 2 31 أمس, 05:08 AM
آخر رد: bidaya
  برنامج VB6 النسخة الفرنسية كاملة الخير طهوري 6 227 12-04-17, 04:34 PM
آخر رد: الخير طهوري
  برنامج حساب ساعات إضافية فيصل علي 2 117 30-03-17, 02:17 AM
آخر رد: فيصل علي
  سؤال حول الأداة datareport فى برنامج مرفق المبرمج العتيق 4 166 26-03-17, 04:16 PM
آخر رد: Ahmed_Mansoor
  محتاج برنامج ارشفه الكترونية مفتوح المصدر رجل الكهرباء 26 3,581 23-02-17, 04:59 PM
آخر رد: فهد الحياه
  [سؤال] برنامج شؤون الموظفين بصورة الموظف مروة سالم 5 293 11-02-17, 01:43 AM
آخر رد: Amir_alzubidy
  رابط تحميل برنامج 6.0 Microsoft Visual Basic ابو يسرية 2 191 08-02-17, 04:52 PM
آخر رد: ابو يسرية
  طلب برنامج ActiveReports 2 iAwadop 3 224 27-01-17, 12:38 AM
آخر رد: iAwadop
  فتح برنامج مبرمج بالفيجوال بيسك6 و قاعدة بيانات MYSQL Ahmed Salem12 1 346 01-12-16, 03:40 PM
آخر رد: sendbad100
  [سؤال] احتاج مساعده في برنامج موعد الحضور والانصراف mera 6 641 30-11-16, 10:59 PM
آخر رد: فاطمة غ

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


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