dim n,ans,i n=inputbox("n(0<=n<=170)=") ans=1 for i=1 to n ans=ans*i next msgbox(ans) 以上就是【算阶乘的vbs小程序】的全部内容了,欢迎留言评论进行交流!