首页 / 编程脚本 / 算阶乘的vbs小程序

dim n,ans,i
n=inputbox（"n（0<=n<=170）="）
ans=1
for i=1 to n
ans=ans*i
next
msgbox（ans）