我有一到数学题不会,请大家解一下

我编程序计算后得知2分之1乘4分之3盛6分之5乘8分之7~~一直乘到100分之99的结果的结果是0.0795892373871787，比10分之1小。

程序如下：

Private Sub Command1_Click()
b = 1
For a = 1 To 99 Step 2
b = b * a / (a + 1)
Next
Text1 = b
End Sub

10分之1大