براي حساب كردن !n چه كار بايد بكنم ؟

اگه اشكالي داشتيد بپرسيد توضيح ميدم

دوست عزیز . لطفا کنید اینجور سوالهای را جواب ندید . بزارید یه مقدار خودشون فکر کنن . اگر قرار باشه همه مسائل اینطوری حل کنن هیچ وقت نمیتونن برنامه نویس خوبی بشن .
در ضمن اینجور سوال های همیشه وقتی که توابع بازگشتی رو درس میدن میگن . و میگن با استفاده از توابع بازگشتی نوشته بشه . نه با دو تا حلقه For
موفق باشی .

این جواب نداد یه توضیح میدید که چی میخواد و چی باید در برنامه باشه ؟ ممنون میشم
راستی مانیا جان بابت اشتباهم معذرت میخوام

براي اين كار كدهاي زير را در يك ماژول بنويسيد .
public function fact (n as integer) as long
dim f as long , i as integer
f=1
for i=1 to n
f=f*i
next i
fact=f
end function