تقييم الموضوع :
  • 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
نرجو في المره القادمة ان ترفق مشروعك للتعديل علية 
الرد
تم الشكر بواسطة: محمد الشمري


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة حول منع تشغيل فورم بحالة عمل آخر sh.hasan 0 25 أمس, 03:05 AM
آخر رد: sh.hasan
  [vb6.0] مساعدة في الفورم الثاني بالمشروع سمير الجبالي 3 258 17-07-18, 12:04 AM
آخر رد: سمير الجبالي
  مساعدة في رسالة خطاء VB.NET 5 345 27-03-18, 08:03 PM
آخر رد: VB.NET
  [سؤال] تم الحل: مساعدة اخي احمد منصور علي مثالك لنسخ قاعدة البيانات والاتصال بها awidan76 7 248 28-01-18, 06:56 PM
آخر رد: awidan76
  مساعدة في الوينسوك VB.NET 7 297 16-12-17, 02:10 AM
آخر رد: VB.NET
  مساعدة في فتح ملفات جاهزة في فورم Visual Basic 0 208 06-12-17, 07:19 PM
آخر رد: Visual Basic
  طلب مساعدة في قراءة كلمة بمجرد التأشير عليها بالماوس khalid tharwat 3 908 14-03-17, 01:02 AM
آخر رد: عبد العزيز البسكري
  [سؤال] مساعدة في عمل خصم نسبة مئوية VB.NET 3 813 23-02-17, 12:25 PM
آخر رد: Ashraf Elafify
  مساعدة الملف التنفيدي لا يشتغل على وندوز 7 chatbi 2 682 07-01-17, 09:03 PM
آخر رد: Ashraf Elafify
Rainbow [سؤال] مساعدة لعمل برنامج حضور وانصراف+وقاعدة بيانات+ربط بالوورد لسهولة طباعة بعض الفورمز فاطمة غ 8 3,891 01-12-16, 06:37 PM
آخر رد: Amir_alzubidy

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


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