جمع رکوردهای یک فیلد دیتابیس در text box

[silverado]

سلام
چطور میشه یک رکورد دیتابیس رو جمع کرد و تو یه textbox نوشت ؟
مثال :
قبض آب 10000ریال
قبض برق 15000 ریال
قبض گاز 20000 ریال
جمع کل 45000 ریال

من خودم اینو انجام دادم اما نمی دونم چرا اعداد بزرگ رو جمع نمی کنه مثلا اگه به جای اعداد بالا اینا رو بذارم ارور میده

قبض آب 1000000 ریال
قبض برق 1500000 ریال
قبض گاز 2000000 ریال
جمع کل 4500000 ریال
اگه کسی می دونه راهنمایی کنه . ترجیحا با کنترل data باشه

[ahmad abdoli]

سلام

یه راه حل اینه که از دستور sql استفاده کنی(بهترین راه حل):


Data1.RecordSource="SELECT sum(mablgh) as jamekol from Customer"


و خاصیت dataSource مربوط به textbox زو برابر Data1 بذاری و خاصیت datafield رو هم برابر jamekol

راه حل دیگه استفاده از دستور for:


For i=0 To data1.Recordset.RecordCount
sum=sum+Val(data1.Recordset.Fields("mablagh"))
data1.Recordset.MoveNext
Next i