منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ارجو المساعده في الفلكس جريد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : ارجو المساعده في الفلكس جريد (/showthread.php?tid=1601)



ارجو المساعده في الفلكس جريد - VB.NET - 18-01-14

لدي جدول فيه كالتالي :

رقم الصنف اسم الصنف الكمية السعر الأجمالي
1 برنامج 1 100
1 برنامج 1 100
1 برنامج 1 100
استخدمت هذا الكود لعرض البيانات في الفلكس جريد ولاكن اريد كود لعرضها في صطر واحد بعمليت الجمع هكذا :
رقم الصنف اسم الصنف الكمية السعر الأجمالي
1 برنامج 30 300

1 برنامج 3 300

هذا هو الكود الذي استخدمه ولاكن كيف اجمع الكمية والسعر واظهار في سطر واحد في الفلكس جريد

If rs.State = 1 Then rs.Close
rs.Open "select * from sandata where dateh Between #" & d3 & "# and #" & d4 & "#", DB, adOpenStatic, adLockPessimistic
If rs.EOF Then
MsgBox "لايوجد أصناف", vbInformation, "تنبيه"

Else
Do While Not rs.EOF
I = I + 1
grid.Rows = I + 1
grid.TextMatrix(I, 0) = rs("itemnom")
grid.TextMatrix(I, 1) = rs("itemsname")
grid.TextMatrix(I, 2) = rs("unit")
grid.TextMatrix(I, 3) = rs("price")
grid.TextMatrix(I, 4) = rs("total")
grid.TextMatrix(I, 5) = rs("dat")
grid.TextMatrix(I, 6) = rs("invno")

rs.MoveNext
Loop



End If


RE: ارجو المساعده في الفلكس جريد - تركي الحلواني - 18-01-14

ارفق مشروعك ليتم التعديل علية


RE: ارجو المساعده في الفلكس جريد - VB.NET - 18-01-14

هذا المثال يرجى ادخال الرقم (01) ثم النقر على موافق نريد ان نجمع عمود رقم 3 ورقم 4 واظهارها في سطر واحد


RE: ارجو المساعده في الفلكس جريد - تركي الحلواني - 18-01-14

تفضل


RE: ارجو المساعده في الفلكس جريد - VB.NET - 18-01-14

اخوي تركي نفس العملية ولاكن ان يدمجها في سطر واحد

يعني هيا الان اربعه سطور تكون سطر واحد فقط

1 الرئيسي الرئيسي 1 1
1 الرئيسي الرئيسي 1 1
1 الرئيسي الرئيسي 1 1
1 الرئيسي الرئيسي 1 1







1 الرئيسي الرئيسي 4 4


RE: ارجو المساعده في الفلكس جريد - تركي الحلواني - 18-01-14

تفضل اسف مافهمت في الاول


RE: ارجو المساعده في الفلكس جريد - VB.NET - 18-01-14

الله يعطيك العافية مشكووووووووووووووور