UC知道问一个简单的vf timer的数据库问题...
来源：百度知道 编辑：UC知道 时间：2024/05/17 03:17:14
一个vf表单的设计
功能就是点确定后 计算text1.value值的阶乘,
利用一个timer1来控制一秒计算一次.
比如输入5 点确定后
第1秒 显示1
第2秒 显示2
第3秒 显示6
第4秒 显示24
第5秒 显示120
现在表单加了
timer1
text1用来写n
text2用来显示n的阶乘
command1点击后开始计算
x=val(thisform.text1.value)
i=1
s=1
do while i<=x
s=s*i
i=i+1
enddo
thisform.text2.value=s
这个是阶乘的算法
我现在就想知道怎么控制这个timer1
谢谢!!!
功能就是点确定后 计算text1.value值的阶乘,
利用一个timer1来控制一秒计算一次.
比如输入5 点确定后
第1秒 显示1
第2秒 显示2
第3秒 显示6
第4秒 显示24
第5秒 显示120
现在表单加了
timer1
text1用来写n
text2用来显示n的阶乘
command1点击后开始计算
x=val(thisform.text1.value)
i=1
s=1
do while i<=x
s=s*i
i=i+1
enddo
thisform.text2.value=s
这个是阶乘的算法
我现在就想知道怎么控制这个timer1
谢谢!!!
click事件
thisform.timer1.enabled=.t.
x=0
timer1 timer事件下
m=val(thisform.text1.value)
x=1
i=1
s=1
do while i<=x
s=s*i
i=i+1
enddo
x=x+1
thisform.text2.value=s
if x=m+1
thisform.timer1.enabled=.f.
endif
架设x为公共变量