تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في حساب مجموع label و textbox
#1
السلام و عليكم و رحمة الله

ارجوا من الاخوة المساعدة في حساب مجموع label و textbox

عملت هذا الكود لكن يعطيني نتائج خاطئة حيث انه يتجاهل الارقام بعد الفاصلة
Label1.Caption = Val(Label1.Caption) + Val(Text1.Text)

مرفق مثال للتعديل
جزاكم الله خيرا


الملفات المرفقة
.rar   المجموع.rar (الحجم : 1.56 ك ب / التحميلات : 50)
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

- أخي العزيز إذا أردت ، إستخدام العمليات الحسابية والتي تحتوي على أرقام عشرية أو فواصل وتريد النتيجة أن تكون دقيقة ، أسند العملية إلى متغير من نوع single أو Double :

- مثال :

كود :
Dim A As Double

A = Val(Text1.Text) + Val(Label1.Caption)
Label2.Caption = A

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد }}}}
تم الشكر بواسطة:
#3
بارك الله فيك اخي الفاضل لكن لم يعمل معي الكود

ارجوا التعديل على المثال المرفق


الملفات المرفقة
.rar   المجموع.rar (الحجم : 1.56 ك ب / التحميلات : 55)
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم

- أنا آسف أخطأت في الإجابة السابقة ، حيث لابد أن تسند كل طرف من العملية الحسابية وليس الناتج فقط ، كما يلي :

كود :
Dim A As Double
Dim B As Double
Dim C As Double

A = Val(Text1.Text) + Val(Label1.Caption)
B  = Val(Text1.Text) + Val(Label1.Caption)
C = A + B
Label2.Caption = C

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد }}}}
تم الشكر بواسطة:
#5
بارك الله فيه اخي الكريم اسال الله ان يدخلك الجنة ويغفر لك و لوالديك
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في كود جلب الصورة وحفظها في قاعدة البيانات مصمم هاوي 3 169 04-09-16, 09:36 AM
آخر رد: مصمم هاوي
  [vb6.0] اخوتي الاعزاء في المنتدى مساعدة عاجلة sher 0 90 30-08-16, 09:37 AM
آخر رد: sher
  picture box مساعدة بخصوص اداة ابو مهدي 2 124 21-08-16, 01:40 PM
آخر رد: ابو مهدي
  [vb6.0] مساعدة من اهل الخبرة sher 2 199 21-07-16, 12:24 PM
آخر رد: Amir_alzubidy
  [vb6.0] مساعدة لتخطي هذه المشكلة sher 1 103 18-07-16, 03:10 PM
آخر رد: Amir_alzubidy
  مساعدة في تصميم برنامج صغير (طرة وكتبة) starwarr2005 2 181 22-05-16, 01:42 PM
آخر رد: starwarr2005
  ارجو المساعده بخصوص حركة النص من اليسار الى اليمين في textbox ابو مهدي 8 392 20-05-16, 02:21 PM
آخر رد: ابو مهدي
  [vb6.0] تحويل الصوت الى نص داخل textbox maro 2 776 13-04-16, 11:12 AM
آخر رد: MicroDoha
Question [كود] مساعدة فى كود برنامج اتصال برودباند mangawy 2 1,825 13-04-16, 11:03 AM
آخر رد: MicroDoha
Information [vb6.0] مساعدة بخصوص قاعدة البيانات abdokablan 7 276 17-03-16, 03:41 PM
آخر رد: abdokablan

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


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