Question

vf的for循环如何实现

设计一个名称为form2的表单。
要求：
1.表单运行时在屏幕中居中显示。
2.在表单上添加一个文本框控件，名称为text1；一个标签控件，名称为la1，显示字号14,红色，设文本框初值为0；
两个命令按钮，名称分别为comm1、comm2，Caption分别设置为"确定"，"退出"。
3.在文本框中输入一个整数，单击确定按钮时,在标签上显示出此整数的阶乘结果值
(用for循环,i为初值，求P阶乘 ,把文本框内容赋值给n,并使用for i=1 to n)。
单击退出按钮时，返回到系统状态。

Answer 1

双击“确定”按钮，打开其click代码窗口，输入
t=1
for n=1 to val(allt(thisform.text1.value))
t=t*n
endfor
thisform.la1.caption=allt(str(t))
thisform.refresh
然后再双击“退出”按钮，输入
thisform.release
下面就可以运行了。