十万火急！！！请VB高手帮我解答此程序改错题！每个FOUND的下一行都有错误，请改正。明天就考试了，着急!

x = 1 For i = 1 To m '**********FOUND********** x = i x被重定义，此循环不会结束 ------------------------------------- fact(n)要求n为非负数 你的n一开始就是-1 那么在+1后，为0 那么1/0是无理数，所以会错 －－－－－－－－－－－－－ 因为 item = 1 / fact(n)这儿就错了 所以