要小数点后16位有效小数点，但vfp好像只能取到有效13位小数，比如300除1.05=285.7142857142857 ，但我实际小需要的值是300除1.05=285.714285714285714 (多出两位有效小数) 如果SET DECIMALS TO 18 也返回不了16位小数 它显示成285.714285714285700  
VB中有很好的解决办法：如下  
Dim a As Variant
a = 22
a = a / 7
Debug.Print a
上述代码的运行结果为 3.14285714285714，这是双精度浮点数的精度极限（15位有效数字）。
如果代码改为：
Dim a As Variant
a = CDec(22)
a = a / 7
Debug.Print a
则显示结果为：3.1428571428571428571428571429

这样也只能是15位有效数字

set deci to 18
?22/7

因为我需要用到小数点后面保留16位有效数字，可是VFP最多就13位有效小数点，我用windows的计算器（科学型）结果是这样285.71428571428571428571428571429  如果标准型是这样285.7142857142857 这个结果就是VFP里的16精度的结果，不够用，要科学型这样的结果，哪怕是多2位小数也行，有办法吗？

vfp 高级版本不清楚  6.0貌似只能到小数点后15位 再多就截断了

显示最多18位：符号 + 整数部分 + 小数点 + 小数部分。

[此贴子已经被作者于2017-3-27 22:14编辑过]

测试，2楼办法可行。

如果只是显示运算结果看看的，应该有办法。
如果是要保证16位小数运算精度，应不能用数值运算。
或者可以试试用字符串形式“运算”，如"123"/"456"="0.2697368421052632"

赞成7楼。直接数值运算会出现精度问题。用程序加入字符方式运算可能会解决。

VFP的数值型字符限制是20个，符号 + 整数部分 + 小数点 + 小数部分 = 20个字符，其中小数部分数字限制最多是19个。