以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]用什么代码能实现?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=128428)

--  作者:youngerlsy123456
--  发布时间:2018/12/5 23:07:00
--  [求助]用什么代码能实现?
假如155>x>100时,x=5
假如255>x>=155,x=10
假如355>x>=255,x=15
假如455>x>=355,x=20
一直到100万

我曾经想用C语言的取整方式,x=((int)(x-55)/100)*5,但这种在FOXTABLE好像不行.
有什么代码能实现呢?非常感谢

--  作者:有点甜
--  发布时间:2018/12/5 23:29:00
--  
Dim x As Double = 330
x = cint((x-55)/100)*5
msgbox(x)

--  作者:youngerlsy123456
--  发布时间:2018/12/5 23:44:00
--  
多谢多谢,,还有点差错,不过方法懂了,我再研究下