Question

vb,通过公式计算得到一个数值，怎样取到小数点后三位，并...

Answer 1

vb,通过公式计算得到一个数值，怎样取到小数点后三位，并...
设你上面的E值要取三位小数点：
【方法一】
E = Round(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,3)
【方法二】
E = Format(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,"0.000")

显示三位小数点的作用是，一般主要用于显示的时候才用，中间过程没必要使用的。上面的两个方法其实也是没必要的，因为它是中间过程，这里只是给你看而已。真正使用时如下（假如要在文本框text1显示E值给用户看）：
【方法一】
Text1.text= Round(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,3)
或Text1.text=Round(E,3)
【方法二】
Text1.text== Format(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,"0.000")
或Text1.text=Format(E,"0.000")

Answer 2

round(xxxxxxx,3)
format(xxxxxxxxx,"#0.000")