الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مشكله مع DataGriad

مغلق
بدأه hagr في 16 ديسمبر 2004 · 4 رد · 711 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

ملخص المشكله

عندى عندى DataGriad تاخذ بياناتها من data1 تعرض البيانات كود مورد - اسم مورد - كميه التوريد

المشكله هى بأنى عايز اجمع كل الكميات الخاصه بمورد معين ثم وضعها فى text خارجى بعيد عن DataGriad على نفس الفورم

واكن لكم جزيل الشكر محتجها ضرورى ضروى

#2

اليك الفكرة وعليك التنفيذ

ممكن تعمل فلترة لعرض المورد المراد جمع كمياته

ثم تستخدم الامر التالى

datagrid1.field(1)+field(2)

جرب وأن شاء الله توصل

#3

اين خبراء الاكواد محتاج لهيك الكود ضروى

ملخص المشكله

عندى عندى DataGriad تاخذ بياناتها من data1 تعرض البيانات كود مورد - اسم مورد - كميه التوريد

المشكله هى بأنى عايز اجمع كل الكميات الخاصه بمورد معين ثم وضعها فى text خارجى بعيد عن DataGriad على نفس الفورم

واكن لكم جزيل الشكر محتجها ضرورى ضروى

#4

اكتب الكود التالي

Text1 = "0"

Dim tot

Data2.Recordset.MoveFirst

Do Until Data2.Recordset.EOF = True

tot = Val(Data2.Recordset![total_cost])

Text1 = Val(tot) + Val(Text1)

Data2.Recordset.MoveNext

Loop

#5

اكتب هذا الكود


Text1 = "0"
Dim tot
Data2.Recordset.MoveFirst
Do Until Data2.Recordset.EOF = True
tot = Val(Data2.Recordset![total_cost])
Text1 = Val(tot) + Val(Text1)
Data2.Recordset.MoveNext
Loop

هذا الموضوع مغلق.

مواضيع مشابهة