【分享】VFP9增强命令TRIM、ALLTRIM、RIGHT
去数值尾部的0，如果数值字段多记录多，转json很有用? ALLTRIM("12.0", "0",".")
? RTRIM("12.100", "0")
? TRIM(TRANSFORM(-012.00), "0")
2万记录5字段测试：TRIM(TRANSFORM(-012.00), "0")
自定义函数 0.328 秒
TRIM命令 0.064 秒
速度大约提高 5 倍
以下是引用csyx在2025-10-20 18:54:29的发言：
有这么用的吗？1200 全变 12 了
? ALLTRIM("1200.00", "0",".")
? ALLTRIM("1200", "0",".")
有这么用的吗？1200 全变 12 了
? ALLTRIM("1200.00", "0",".")
? ALLTRIM("1200", "0",".")
这么用确实有BUG
这样可以：
a = "1200"
b = "1200.00"
? LTRIM(RTRIM(RTRIM(STR(VAL(a),20,4), '0'), '.'))
? LTRIM(RTRIM(RTRIM(STR(VAL(b),20,4), '0'), '.'))
[此贴子已经被作者于2025-10-21 18:58编辑过]