vb里面有没有PI函数啊？

Question

为什么这么算结果是0，而不是我想要的运算结果呢？Private Sub Form_Click()a! = 5#b! = 2.5c! = 7.8Dim y As Doubley = (pi * a * b) / (a + b * c)Print yEnd Sub

Answer 1

'没有，只能自定义常量
Const pi!=3.151592628

Private Sub Form_Click()
a! = 5#
b! = 2.5
c! = 7.8
Dim y As Double
y = (pi * a * b) / (a + b * c)
Print y

End Sub