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

رقم الصنف اسم الصنف الكمية السعر الأجمالي
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
الرد }}}
تم الشكر بواسطة:
#2
ارفق مشروعك ليتم التعديل علية
[صورة مرفقة: images?q=tbn:ANd9GcT72OLJW7D1E5QW-HUeWeJ...TGoNeg2jnQ]
الرد }}}
تم الشكر بواسطة:
#3
هذا المثال يرجى ادخال الرقم (01) ثم النقر على موافق نريد ان نجمع عمود رقم 3 ورقم 4 واظهارها في سطر واحد


الملفات المرفقة
.rar   البرنامج.rar (الحجم : 19.46 ك ب / التحميلات : 93)
الرد }}}
تم الشكر بواسطة:
#4
تفضل


الملفات المرفقة
.rar   البرنامج.rar (الحجم : 61.77 ك ب / التحميلات : 128)
[صورة مرفقة: images?q=tbn:ANd9GcT72OLJW7D1E5QW-HUeWeJ...TGoNeg2jnQ]
الرد }}}
تم الشكر بواسطة:
#5
اخوي تركي نفس العملية ولاكن ان يدمجها في سطر واحد

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

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







1 الرئيسي الرئيسي 4 4
الرد }}}
تم الشكر بواسطة:
#6
تفضل اسف مافهمت في الاول


الملفات المرفقة
.rar   البرنامج.rar (الحجم : 61.77 ك ب / التحميلات : 126)
[صورة مرفقة: images?q=tbn:ANd9GcT72OLJW7D1E5QW-HUeWeJ...TGoNeg2jnQ]
الرد }}}
تم الشكر بواسطة: VB_Coder
#7
الله يعطيك العافية مشكووووووووووووووور
الرد }}}
تم الشكر بواسطة:



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


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