Office中国论坛/Access中国论坛

标题: 急求高手！关于进度条 [打印本页]

作者: bigbig 时间: 2004-4-2 17:56
标题: 急求高手！关于进度条
加了个窗体专门显示进度。
progCheck为Progress
Private Sub Form_Timer()
Me.progCheck.value = Me.progCheck.value + g_intProgressStep
If Me.progCheck.value >= Me.progCheck.Max Then
Me.progCheck.value = Me.progCheck.Min
End If
DoEvents
End Sub
在进行耗时的处理前（大量数据操作），打开此窗体，为什么只执行timer（）一次呢，进度条不前进了？

作者: bigbig 时间: 2004-4-2 19:01
应该是 DoEvents 用错了吧

作者: 土豆 时间: 2004-4-2 20:31
ACCESS的状态栏提供了现成的进度条可用

作者: bigbig 时间: 2004-4-2 21:00
可是我将Access的主菜单隐藏了啊?

作者: AlexLiu 时间: 2004-4-3 05:52
要想进度条动，要在循环里加入ME.REPAINT重画窗体。

作者: p51219 时间: 2015-12-3 23:39
学习学习

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)