تقييم الموضوع :
  • 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
بارك الله فيه اخي الكريم اسال الله ان يدخلك الجنة ويغفر لك و لوالديك
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في تحزيم المشروع VB6 عبد الرحمان البسكري 14 244 15-04-17, 11:01 AM
آخر رد: عبد العزيز البسكري
  [vb6.0] طلب مساعدة - أريد كود البحث السريع وعمل ملف تثبيت لبرنامجي المرفق Soufyane 1 93 10-04-17, 01:45 PM
آخر رد: Amir_alzubidy
  مساعدة بخصوص Listview haniblack 2 106 28-03-17, 06:21 PM
آخر رد: Amir_alzubidy
  [vb6.0] ارجو التعديل على مجموع الحسابين الموجود في المشروع عبدالقادرعواد 2 185 23-02-17, 01:35 AM
آخر رد: عبدالقادرعواد
  مساعدة فى تقسيم الشهر إلى 3 أقسام hsab 7 299 06-02-17, 10:39 PM
آخر رد: اسلام الكبابى
  مساعدة في كود جلب الصورة وحفظها في قاعدة البيانات مصمم هاوي 3 430 04-09-16, 09:36 AM
آخر رد: مصمم هاوي
  [vb6.0] اخوتي الاعزاء في المنتدى مساعدة عاجلة sher 0 227 30-08-16, 09:37 AM
آخر رد: sher
  picture box مساعدة بخصوص اداة ابو مهدي 2 290 21-08-16, 01:40 PM
آخر رد: ابو مهدي
  [vb6.0] مساعدة من اهل الخبرة sher 2 344 21-07-16, 12:24 PM
آخر رد: Amir_alzubidy
  [vb6.0] مساعدة لتخطي هذه المشكلة sher 1 233 18-07-16, 03:10 PM
آخر رد: Amir_alzubidy

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


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