منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم
قمت بعمل برنامج يخزن قيم للموردين في جدول مثال
خالد 5
خالد 9
خالد 10
في تواريخ مختلفة اريد كود يقوم بجمع القيم من داخل الجدول بحيث يكون فقط سجل واحد
خالد 24

*****************

قمت بتجربة هذا الكود ويعطيني دائما القيمة صفر

كود :

Text11 = 0

temp22.MoveFirst

Do Until temp22.EOF

For x = 1 To RecordCount

y = y + temp22.Fields("mostf")

x = x + 1

Next x

temp22.MoveNext

Loop

Text11 = y

ولكم جزيل الشكر

اخي العزيز هذا تصحيح لكودك في حالة كون اسم العمود الذي حددته حضرتك صحيح

كود :

temp22.MoveFirst

Text11="0"

While Not temp22.EOF

    Text11=Val(Text11) + Val(temp22.Fields("mostf"))

    temp22.MoveNext

wend

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

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

محمد الشمري

محمد العبيدي