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


For N = 1 To (Val(mshflexgrid.Rows) - 1
summark = Val(mshflexgrid.TextMatrix(N, 1)) + summark
Next N
Label1.Caption = summark

اخواني عند العمل بهذا الكود الناتج يكون خاطي اذا تضمنت خلايا الفيلكس قريد ارقاما عشرية

حيث يكون مجموع الارقام التالية مثلا

24.2
24.6

الناتج 48 مع انه يجب ان يكون الناتج 48.8

ارجوا المساعدة من الاخوة الافاضل
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

- عدل كودك ليصبح هكذا :

كود :
Dim A As Double
For N = 1 To (Val(mshflexgrid.Rows) - 1
A= A + Val(Trim$(mshflexgrid.TextMatrix(N, 1)))
Next N
Label1.Caption = A
'OR
Label1.Caption = Format$(A, "#.##")

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة فى تقسيم الشهر إلى 3 أقسام hsab 7 167 06-02-17, 10:39 PM
آخر رد: اسلام الكبابى
  مساعدة في كود جلب الصورة وحفظها في قاعدة البيانات مصمم هاوي 3 266 04-09-16, 09:36 AM
آخر رد: مصمم هاوي
  [vb6.0] اخوتي الاعزاء في المنتدى مساعدة عاجلة sher 0 148 30-08-16, 09:37 AM
آخر رد: sher
  picture box مساعدة بخصوص اداة ابو مهدي 2 192 21-08-16, 01:40 PM
آخر رد: ابو مهدي
  [vb6.0] مساعدة من اهل الخبرة sher 2 268 21-07-16, 12:24 PM
آخر رد: Amir_alzubidy
  [vb6.0] مساعدة لتخطي هذه المشكلة sher 1 155 18-07-16, 03:10 PM
آخر رد: Amir_alzubidy
  مساعدة في تصميم برنامج صغير (طرة وكتبة) starwarr2005 2 242 22-05-16, 01:42 PM
آخر رد: starwarr2005
Question [كود] مساعدة فى كود برنامج اتصال برودباند mangawy 2 1,929 13-04-16, 11:03 AM
آخر رد: MicroDoha
Information [vb6.0] مساعدة بخصوص قاعدة البيانات abdokablan 7 370 17-03-16, 03:41 PM
آخر رد: abdokablan
  مساعدة في كود التقاط صورة sher 0 206 07-03-16, 01:01 PM
آخر رد: sher

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


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