چه جوری یه مبلغ رو گرد کنم؟

[BLACK-BLACK]

سلام دوستان.
دارم یه برنامه کافینت مینویسم میخام مبلغ رو به صورت رند نشون بده مثلا مبلغ 5437 رو بکنه 5500 یعنی تا رقم سوم رو رند کنه

[sadeghbarout]

سلام
با تابع int میتونی جزه صحیح یه عدد رو نشون بدی مثلا در کد زیر مقدار X میشود 180000

X=int(180000.56)

[!Plus]

خود ویژوال بیسیک تو کتابخانه VBA چند تا از این توابع داره...! ولی همه اون ها واسه گرد و رند کردن اعداد اعشاری ه...! (مثل همونی که دوستمون گفتند...!)

ولی یه راه حل دیگه هم وجود داره...!

از تابع CInt برای گرد کردن اعداد اعشاری هم استفاده میشه...! (البته کار اصلی ش چیز دیگه ای ه...!) ولی عدد ما اعشاری نیست... اما میشه اعشاری ش کرد...!

می تونید عددتون رو به 10 به توان تعداد رقم هایی که باید گرد بشه... تقسیم کنید...! و بعد با استفاده از همون توابع گرد کننده... گردش کنید... و بعد دوباره ضرب در 10 به توان تعداد رقم های گرد شده ش کنید...!

کار سختی نیست... اگه خواستید بگید تا خودم تابعش رو براتون بنویسم...!

موفق باشید...!