visual basic中程序问题

各位帮我翻译一下这段程序，最好作详细解释，还有个空我不知道填什么。一个正整数的阶乘是所有小于该数的正整数的积，并且0的阶乘为1，自然数n的阶乘为n!，如下:dim i as integer
dim k as integer
dim s as double
s=( )
k=val(text1，text)
for i=1 to k
( )
next
label2.caption=k&"!="&s

1
s=s*i