Office中国论坛/Access中国论坛

标题: 如何转移程序流，继续执行原事件中的代码 [打印本页]

作者: mclly2000 时间: 2013-6-18 22:06
标题: 如何转移程序流，继续执行原事件中的代码
本帖最后由 mclly2000 于 2013-6-18 22:14 编辑

事情大概是这样有如下代码：
窗体XXX的命令按钮B的click事件如下：
Private Sub Cmd_B_Click()
aa---------------------------------------‘这里是代码省略了
bb---------------------------------------‘这里是代码省略了
DoCmd.OpenForm "FrmDataLoad", , , , , acDialog
cc---------------------------------------‘这里是代码省略了
dd---------------------------------------‘这里是代码省略了
Me.Refresh
DoCmd.Close acForm, "FrmDataLoad"
End Sub

现在情况出现了，在执行到DoCmd.OpenForm "FrmDataLoad"，窗体FrmDataLoad打开了，但是后面的代码不执行了，不知道我应该如何修改这个代码，在窗体"FrmDataLoad"打开后继续执行后面的代码。
期待群里的老师给回复，谢谢{:soso_e100:}

作者: tmtony 时间: 2013-6-19 00:24
, , , , , acDialog 去掉这个参数

作者: access学习交流 时间: 2013-6-19 09:55
本来代码就是向下阅读的。除非有什么特殊让它跳出来

作者: mclly2000 时间: 2013-6-19 13:33
本帖最后由 mclly2000 于 2013-6-19 13:37 编辑

tmtony 发表于 2013-6-19 00:24
, , , , , acDialog 去掉这个参数

FrmDataLoad窗体为了显示进度条，这段代码的整个语句是为了将ADO记录集加载至窗体，但是数据量太大会出现假死，所以用一个进度条过度下，当数据全部加载至本地再关闭FrmDataLoad窗体。
按照王站的意思我去掉了, , , , , acDialog 参数，但是新的问题出现了，打开的FrmDataLoad窗体有窗体的外框但是主体部分是黑色的，原来计时器显示的进度条效果没有了

作者: tmtony 时间: 2013-6-19 13:45
在进度条代码中添加
doevents 或进度条的refresh事件

作者: tmtony 时间: 2013-6-19 13:45
或 repainting

作者: mclly2000 时间: 2013-6-19 16:10
感谢王站加个DoEvents OK啦

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