vb求阶乘，有没有人帮我看看，代码没问题，逻辑也没问题，为什么结果为0啊

vb求阶乘，有没有人帮我看看，代码没问题，逻辑也没问题，为什么结果为0啊

函数返回值了？从结果看函数没有返回值。