2.517691E-02是科学计数法,就是2.517691乘以10的-2次方
估计你是用Single作为变量类型来计算的,由于Single的精度只有7位,所以超过7位有效数字的数值就会自动用科学计数法表示了.
解决方法有多种:
比如用Double作为变量类型来计算,Double的精度是15位数字,足够使用了:
Dim x As Double
x = 0.02567191123
Text1.Text = x
又比如用Format函数把计算结果强制转为字符型:
Dim x As Single
x = 0.02567191123
Text1.Text = Format(x,"0.00000000")
End Su