PDA

View Full Version : جمع کردن اعداد درون یک فیلد


Veteran
شنبه 12 شهریور 1390, 18:52 عصر
سلام دوستان
میخواستم بدونم جمع اعداد درون یک فیلد را چطوری به دست بیارم
یک سوس بزارین
خیلی خوبه
_behnam_
شنبه 12 شهریور 1390, 23:13 عصر
میتونید با یه حلقه کا رکوردهای موجود رو باهم یکی یکی جمع کنید

Dim X As Integer
Do While Not Recordset.EOF
X = X + Recordset!Fieldname
Loop
MsgBox X
M.T.P
یک شنبه 13 شهریور 1390, 11:00 صبح
روش دوستمون behnam درسته اما روش اصولی و سریع برای جمع مقادیر یک فیلد به شکل زیر هست:

به جای FieldName عنوان فیلدتون و به جای TableName اسم جدولتون رو قرار بدید.

Select Sum(FieldName) As FldSUM From TableName
پس از باز کردن رکوردست به شکل بالا رکوردست شما حاوی یک فیلد با عنوان FldSum هست که مقدارش مجموع اعداد فیلدتون است.
Veteran
یک شنبه 13 شهریور 1390, 13:15 عصر
میتونید با یه حلقه کا رکوردهای موجود رو باهم یکی یکی جمع کنید

Dim X As Integer
Do While Not Recordset.EOF
X = X + Recordset!Fieldname
Loop
MsgBox X

برنامه هنگ میکنه

روش دوستمون behnam درسته اما روش اصولی و سریع برای جمع مقادیر یک فیلد به شکل زیر هست:

به جای FieldName عنوان فیلدتون و به جای TableName اسم جدولتون رو قرار بدید.

Select Sum(FieldName) As FldSUM From TableName
پس از باز کردن رکوردست به شکل بالا رکوردست شما حاوی یک فیلد با عنوان FldSum هست که مقدارش مجموع اعداد فیلدتون است.
ارور
_behnam_
یک شنبه 13 شهریور 1390, 16:19 عصر
برنامه هنگ میکنه
ببخشید یه کد رو نزاشتم اینجوری بزارید

Dim X As Integer
Do While Not Recordset.EOF
X = X + Recordset!Fieldname
Recordset.MoveNext
Loop


MsgBox X