先上图，很简单的，一个按钮一个文本框
作如下计算
Private Sub Command1_Click()

Const M = 1089.9
      PI = 3.1415926
      u = 50
      H3 = 29.15
      L2 = 100
      SnX = 22
halfLw# = M + PI * (u + H3) / 2 + 0.5 * L2 / SnX

Text1.Text = halfLw

End Sub

计算结果显示在文本框里
我按计算器算出来的结果是1223，但是VB算出来的结果为什么会是1216？

我这里计算的也是1216。

Private Sub Command1_Click()
Dim H3
Dim L2
Dim u
Dim PI
Dim SnX
Dim halfLw#
Const M = 1089.9
      PI = 3.1415926
      u = 50
      H3 = 29.15
      L2 = 100
      SnX = 22
halfLw# = M + PI * (u + H3) / 2 + 0.5 * L2 / SnX
Text1.Text = halfLw
End Sub

误差累计。类似蝴蝶效应。

如果真是这样的话，我想要得到想要的结果，如何写代码？
应该不会啊，其他算式有比这个更复杂的也没出错啊

为什么是1223?
1216.5012544177272727272727272727

你的计算器该换了