TC官方合作论坛

标题: 求教 计算结果怎么保留小数点后两位数 [打印本页]

作者: hx2157895    时间: 2016-3-8 22:02
标题: 求教 计算结果怎么保留小数点后两位数
结果=数据0*1150+数据1*1300+数据2*1140+数据3*1225+数据4+数据8+数据9+数据10-数据6
    编辑框设置文本("编辑框11",结果)
    结果1=数据5-数据5/1.2
    编辑框设置文本("编辑框7",结果1)
    结果2=数据5*2600
    编辑框设置文本("编辑框6",结果2)
    过渡=数据5*5.25*3
    编辑框设置文本("编辑框4",过渡)
    实物奖励=结果1*2600
    编辑框设置文本("编辑框8",实物奖励)

QQ截图20160308220440.png (2.38 KB, 下载次数: 3)

QQ截图20160308220440.png

作者: 1102509486    时间: 2016-3-8 22:50
转换成字符串 然后查找字符串中 . 的位置  在找到的位置上加 2位   在用字符串取左边  
作者: 言术    时间: 2016-3-9 06:10
实物奖励=结果1*2600
实物奖励=保留几位小数(实物奖励,2,真)
编辑框设置文本("编辑框8",实物奖励)


功能 保留几位小数(要操作的数,保留几位,是否四舍五入)
    如果(!是否浮点型(要操作的数))
        调试输出("不是浮点型")
        返回 假
    结束
   
    变量 小数点位置=字符串查找(要操作的数,".")
    如果(是否四舍五入&&保留几位<=0)
        返回 转整型(要操作的数)
    否则如果(保留几位<=0)
        返回 取整(要操作的数)
    否则如果(是否四舍五入)
        变量 要四舍五入的数=字符串截取(要操作的数,小数点位置+保留几位+1,小数点位置+保留几位+2)
        如果(要四舍五入的数>=5)
            变量 进位="0."
            遍历(变量 i = 0; i < 保留几位-1; i++)
                进位=进位&"0"
            结束
            进位=进位&"1"
            要操作的数=要操作的数+进位
        结束
    结束
   
    返回 字符串截取左侧(要操作的数,小数点位置+保留几位+1)
结束
作者: hx2157895    时间: 2016-3-9 09:37
就是保留小数点后两位四舍五入的 就相当于做个计算器所得的结果保留小数点后两位四舍五入         看你们写的我试了试 好像还是不行啊
作者: good    时间: 2016-3-9 12:34
本帖最后由 good 于 2016-3-9 12:41 编辑




得自己再加个功能只输入数字,要不就得返回值前把小数保留类型搞妥.
输入整数或带一位小数的,数字不变, 你想把1变成1.00得另外往里面填代码


作者: hx2157895    时间: 2016-3-9 14:06
我用的是tc5.0 语法上有点小出入 但试了试 好像还是不行哎  是不是设置的太复杂了

作者: 言术    时间: 2016-3-12 07:49

。。。。。

测试一下.rar

1.66 KB, 下载次数: 403


作者: xyn3007    时间: 2016-11-27 08:43
本帖最后由 xyn3007 于 2016-11-27 08:46 编辑

刚学TC,遇到了小数点问题。参考各ID的思路,最后如下方法解决,也是仅供参考
功能 按钮0_点击()
    //这里添加你要执行的代码
    处理_小数点后位数(312.3173586,1)
    处理_小数点后位数(312.3173586,2)
    处理_小数点后位数(312.3173586,3)
    处理_小数点后位数(312.3173586,4)
    处理_小数点后位数(312.3173586,5)
结束
功能 处理_小数点后位数(需处理数字,保留位数)
    变量 临时文本=转字符型(转整型(需处理数字*(数学求幂(10,保留位数))))
    临时文本=字符串截取左侧(临时文本,字符串长度(临时文本)-保留位数)&"."&字符串截取右侧(临时文本,保留位数)
    消息框("初始数字:"&需处理数字&"\r\n保留位数:"&保留位数&"\r\n处理后数:"&临时文本)
结束

作者: cxmin123456    时间: 2016-11-29 14:08
先把结果乘以100,然后四舍五入取整,再除以100




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1