调用了精易模块的取文本命令,参考了论坛里找的一个源码,用的大数xx类型
|
_四舍五入_指定小数位数 | 文本型 | | |
大数文本 | 文本型 | | | | 小数点后位数 | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 保留文本 | 文本型 | | | 整数部分 | 文本型 | | | 小数部分 | 文本型 | | | 取出小数 | 文本型 | | | 小数尾部数 | 文本型 | | | 小数尾部数_后一位 | 文本型 | | | 进位小数补零 | 文本型 | | | i | 整数型 | | | 大数_原整数 | 大数 | | | 大数_原取出小数 | 大数 | | | 大数_进位加1 | 大数 | | | 大数_结果 | 大数 | | |
整数部分 = 文本_取左边 (大数文本, “.”)小数部分 = 文本_取右边 (大数文本, “.”)取出小数 = 取文本左边 (小数部分, 小数点后位数 ) 小数尾部数 = 取文本中间 (小数部分, 小数点后位数, 1 ) 小数尾部数_后一位 = 取文本中间 (小数部分, 小数点后位数 + 1, 1 ) 判断 (到数值 (小数尾部数_后一位 ) ≥ 5 )计次循环首 (小数点后位数 - 1, i )进位小数补零 = “0” + 进位小数补零 计次循环尾 ()大数_进位加1. 导入文本 (“0.” + 进位小数补零 + “1”) 大数_原取出小数. 导入文本 (“0.” + 取出小数 ) 大数_原整数. 导入文本 (整数部分 ) 大数_结果 = 大数_进位加1. 加 (大数_原取出小数 ) 大数_结果 = 大数_结果. 加 (大数_原整数 ) 判断 (到数值 (小数尾部数 ) = 9 ) 返回 (大数_结果. 导出文本 () + “0”)返回 (大数_结果. 导出文本 ()) 返回 (整数部分 + “.” + 取出小数 )
|