本人初学者，问VB求圆周率的问题
题目是有一公式计算pi，显示当n=10，50，100时，pi的值各为多少
我已写的代码如下：
Dim pi As Double, n As Long
Private Sub Command1_Click()
pi = 2
For n = 1 To 10000
pi = pi * ((2 * n) / (2 * n - 1)) * ((2 * n) / (2 * n + 1))
Next n
End Sub
我设置了3个label(label1,label2,label3），想三个label同时分别显示当n=10，50，100的pi值，但不知怎么写，请各位大虾指教，谢谢啦。
[解决办法]
Dim pi As Double, n As Long
Private Sub Command1_Click()
pi = 2
For n = 1 To 10000
pi = pi * ((2 * n) / (2 * n - 1)) * ((2 * n) / (2 * n + 1))
if n=10 then label1.caption=pi
if n=50 then label2.caption=pi
if n=100 then label3.caption=pi
Next n
End Sub
