当N较大时,N!会出错.
请看：
Dim i As Long
Dim sinTemp As Single
Dim sinSum As Single
sinSum = 1#
sinTemp = 1#
For i = 1 To 10 '00
sinTemp = sinTemp / i
sinSum = sinSum + sinTemp
Next i
Print sinSum