تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] مساعدة في كود
#1
السلام عليكم
قمت بعمل برنامج يخزن قيم للموردين في جدول مثال
خالد 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

ولكم جزيل الشكر
الرد }}}}
تم الشكر بواسطة:
#2
اخي العزيز هذا تصحيح لكودك في حالة كون اسم العمود الذي حددته حضرتك صحيح
كود :
temp22.MoveFirst
Text11="0"
While Not temp22.EOF
    Text11=Val(Text11) + Val(temp22.Fields("mostf"))
    temp22.MoveNext
wend
نرجو في المره القادمة ان ترفق مشروعك للتعديل علية 
الرد }}}}
تم الشكر بواسطة: محمد الشمري


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة الملف التنفيدي لا يشتغل على وندوز 7 chatbi 2 71 07-01-17, 09:03 PM
آخر رد: Ashraf Elafify
Rainbow [سؤال] مساعدة لعمل برنامج حضور وانصراف+وقاعدة بيانات+ربط بالوورد لسهولة طباعة بعض الفورمز فاطمة غ 8 289 01-12-16, 06:37 PM
آخر رد: Amir_alzubidy
  [سؤال] مساعدة في كتابة كود الزر تخزين مزنة 9 342 28-11-16, 12:44 PM
آخر رد: مزنة
  احتاج مساعدة في الفيجوال بيسك lena114 0 198 25-03-16, 02:50 PM
آخر رد: lena114
  [سؤال] طلب مساعدة iraq_moon 4 284 22-03-16, 07:00 PM
آخر رد: محمد العبيدي
  مساعدة : كود لنسخ قاعد البيانات استرجاعها محمد2015 10 1,090 21-01-16, 01:56 AM
آخر رد: awidan76
  [سؤال] مساعدة في مشروع تسجيل الحضور و الانصراف MarwanMohammed 1 249 19-01-16, 09:02 PM
آخر رد: VB_Local
Lightbulb [سؤال] طلب مساعدة من المختصين chaabane 2 269 02-10-15, 03:07 AM
آخر رد: chaabane
  [سؤال] احتاج مساعدة في متصفحي ابن الجزائر 2 351 16-09-15, 09:16 PM
آخر رد: ابن الجزائر
  مساعدة : كود لتصفير حقل في جدول محمد2015 5 651 16-05-15, 01:45 AM
آخر رد: Ahmed_Mansoor

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


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