以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]我通过计算得到随机的小数0.2558587,0.356,0.2589,0.1256等我怎么能得到他们对应的小数位数,然后我就可以乘以对应10的倍数把他们转换成整数  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=68260)

--  作者:a937775799
--  发布时间:2015/5/13 16:34:00
--  [求助]我通过计算得到随机的小数0.2558587,0.356,0.2589,0.1256等我怎么能得到他们对应的小数位数,然后我就可以乘以对应10的倍数把他们转换成整数
我通过计算得到随机的小数0.2558587,0.356,0.2589,0.1256等我怎么能得到他们对应的小数位数,然后我就可以乘以对应10的倍数把他们转换成整数
--  作者:Bin
--  发布时间:2015/5/13 16:37:00
--  
Dim d As Double=0.2
MessageBox.show(d.tostring().length-d.Tostring().lastindexof(".")-1)

--  作者:a937775799
--  发布时间:2015/5/13 16:46:00
--  
 谢谢,以前这样搞过,好长时间 每写程序,思维变迟钝了