بدست آوردن قسمت اعشار یک عدد اعشاری [بایگانی]

mohammad-gh

یک شنبه 16 فروردین 1388, 18:05 عصر

با سلام
همانطور که همه می دانیم با استفاده از تابع Int می توان قسمت صحیح یک عدد اعشاری را بدست آورد اما قسمت اعشار همان عدد را چگونه بدست بیاوریم.

anooshiran

یک شنبه 16 فروردین 1388, 18:16 عصر

با سلام

Dim aa AsSingle = 12.3
Dim bb AsSingle = aa - Int(aa)

يا

Dim aa As Single = 12.3
Dim bb As Single = aa Mod 1