Распределение Пуассона VB.NET и переполнение стека

Уважаемый может кто-нибудь объяснить, почему в PHP код для этого распределения Пуассона
выполнить правильно и тот же код в VB.NET не так?
Спасибо

PHP:

for ($i = 0; 10 ; $i++) {
$Poisson =  $Poisson + (((pow(($TassodiDomanda*$LT),$i))/factorial($i))*exp(-$TassodiDomanda* $LT));
if ($Poisson > 0.9) {
$Result = $i ;
return $Result;
break;
}
}

VB.NET:

 For i = 1 To 100
Poisson += (((((Math.Pow((tassodidomanda * LT), i)) / Factorial(i))) * Math.Exp(-(tassodidomanda * LT)))
If Poisson >= 0.9 Then
richiesti = i
Exit For
End If
Next i