روند كردن مبلغ ريالي

[majid_labbeiky]

با سلام خدمت دوستان

چطوري ميشه توي فيش حقوقي مبلغ دريافتي روند كنيم و اون مقدار روند شده رو توي فيش حقوقي بياريم .

مثال 4/225/325 ريال بشه روند 325 ريال خالص دريافتي 4/225/000 ريال

يا

4/225/650 ريال بشه روند 350 ريال خالص دريافتي 4/226/000 ريال

[stabesh]

با سلام
تابع Round
http://www.techonthenet.com/access/functions/numeric/round.php

[majid_labbeiky]

شما صورت سوال منو خوب متوجه نشدين .
من يك فيلد جمع كل مزايا دارم ميخوام اون رو روند كنم مثل صورت مسئله بالا .

تابع Round براي اعداد هستش نه مبلغ ...

[stabesh]

نمونه رو ملاحظه بفرمایید
منظورتون اینه ؟

[amirzazadeh]

سلام
اگر منظور شما گرد كردن سه رقم آخر هست براي اينكار شما ميتونيد از توابع زير كمك بگيريد:

Private Sub Form_Current()
Dim x, y, z As Long
x = Len(Me!Amount)
y = Right(Me!Amount, 3)
z = Left(Me!Amount, x - 3)
If y > 500 Then
z = z + 1 & "000"
Else
z = z & "000"
End If
Text6 = z
End Sub