a_r_shariati
سه شنبه 08 فروردین 1385, 19:13 عصر
با سلام
در فانکشن پایین در حالییکه به متغییر wuidمقدار 10010000000 را داده ام مقدار R را 1000064 برمیگرداند. ظاهرا دقت محاسبه بهم خورده.بنظر شما این مشکل را چه کنم
Public Function SubUnit(WUId As Single) As Single
Dim M As Single, T As Single, r As Single
T = Int(WUId / 10)
r = T Mod 100000000
در فانکشن پایین در حالییکه به متغییر wuidمقدار 10010000000 را داده ام مقدار R را 1000064 برمیگرداند. ظاهرا دقت محاسبه بهم خورده.بنظر شما این مشکل را چه کنم
Public Function SubUnit(WUId As Single) As Single
Dim M As Single, T As Single, r As Single
T = Int(WUId / 10)
r = T Mod 100000000