我也是服了我自己了~~~~~我也是醉了，，，不过师傅，我还有个问题不会还想让你帮我解答一下~~~~ 这个计算结果明显是错误的，可是代码也正确啊，是精确度有问题么？应该怎么弄呢？

Private Sub Command1_Click()
D = Val(Text7.Text)
P0 = 1.18 / D ^ 0.5
Text4.Text = P0
End Sub

Private Sub Command2_Click()
Text4.Text = ""
Text7.Text = ""
End Sub