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

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


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

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

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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] برنامج تنبيه صوتي ويندوز 10 aboezzat84 0 83 07-01-24, 06:46 PM
آخر رد: aboezzat84
  برنامج VB6 النسخة الفرنسية كاملة الخير طهوري 7 11,935 02-01-24, 06:55 PM
آخر رد: الخير19
  [vb6.0] ريد كود طيع التقرير نسختين علماً انني استخدم برنامج Active Report ؟ Microformt 2 358 12-11-23, 05:05 PM
آخر رد: Microformt
  [سؤال] ماهو سبب خروج هذه الرسالة كما في الصورة المرفقة عند تشغيل برنامج الفيجوال بيسك6 وادي العوضي 3 498 24-07-23, 11:50 PM
آخر رد: وادي العوضي
Photo [vb6.0] هناك مشكله اكتيف ريبورت يحث يظهر الخط عند عرض التقرير بشكل مكبر ومد في الحرف ؟؟ Microformt 7 768 03-02-23, 01:55 PM
آخر رد: Taha Okla
  مشكله في كود اتصال بجهاز البصمه ahmed1900 0 390 18-01-23, 11:54 AM
آخر رد: ahmed1900
  تحول برنامج مبرمج v.b في xp الو وندوز ٧ kanu3342 9 5,068 10-10-22, 12:02 AM
آخر رد: كاظم هاشم البهادلي
  [سؤال] احتاج برنامج يقرأ من اكسل ضروري لو سمحتم mera 0 505 10-06-22, 03:43 PM
آخر رد: mera
  [كود] برنامج سوبر ماركت نهى علي 11 1,792 07-06-22, 05:14 AM
آخر رد: نهى علي
  برنامج اختبارات( للمناقشه) haider kh 2 993 30-12-21, 08:28 PM
آخر رد: أبو خالد الشكري

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


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