以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]遇到一个奇怪的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28652)

--  作者:qjyqly
--  发布时间:2013/2/7 0:06:00
--  [求助]遇到一个奇怪的问题

遇到一个问题,程序如下:

Dim s As Integer = 0

Do
    e.Form.Controls("显示循环次数").value = s  + 1
    Vars("ydx")=1600
    Functions.Execute("工作移动")

    。。。。。。。。。。。。。。。‘期间有10秒时间
    s = s + 1
Loop While s < 50

 

程序很简单---在50次循环内,每次循环前在“显示循环次数”控件上显示累计数1-50

但实际上50次循环内不显示,50次循环结束后才显示50

For ...Next循环也是这样,不知什么原因,

求各位老师指点,谢!

 


--  作者:whoami2012
--  发布时间:2013/2/7 7:02:00
--  
看这里
http://www.foxtable.com/help/topics/1476.htm

--  作者:qjyqly
--  发布时间:2013/2/7 16:34:00
--  

谢谢指点。

看来论坛高手还挺多,遇到问题都能得到满意的指点,非常感谢!

祝大家新年快乐!