Foxtable(狐表)用户栏目专家坐堂 → [求助]关于延时设置的问题


  共有6112人关注过本帖树形打印复制链接

主题:[求助]关于延时设置的问题

帅哥哟,离线,有人找我吗?
西瓜住持
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:3193 威望:0 精华:2 注册:2012/1/17 10:55:00
[求助]关于延时设置的问题  发帖心情 Post By:2013/3/6 17:16:00 [只看该作者]

比如 我执行了下面的代码。

 

Dim i As Integer
For i = 1 To 300 
 Tables("表B").Rows(i)("第一列") = "123"
System.Threading.Thread.Sleep(100) 
Next
 
他会在循环结束后才显示内容。
是否可以循环的过程中实时显示呢。

 回到顶部
帅哥哟,离线,有人找我吗?
西瓜住持
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:358 积分:3193 威望:0 精华:2 注册:2012/1/17 10:55:00
  发帖心情 Post By:2013/3/6 17:18:00 [只看该作者]

Application.DoEvents()

 

自己搞出来了


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/6 17:19:00 [只看该作者]

Dim i As Integer
For i = 1 To 300 
   Tables("表B").Rows(i)("第一列") = "123"
    Application.DoEvents()
   System.Threading.Thread.Sleep(100) 
Next

 

 


 回到顶部