Access中打开窗体的代码问题，先谢谢！

sunyanjun · 发表于 2011-7-9 14:48:53

本帖最后由 sunyanjun 于 2011-7-9 14:50 编辑

以下是打开窗体的代码，其中第3行是打开“增加日期”窗体的语句。

现在的代码是依次执行代码行1、2、3、4、5后才打开“增加日期”窗体。

请问高手，要实现执行代码行1、2、3后就打开“增加日期”窗体，关闭“增加日期”窗体后在运行代码行4、5，应该如何编写代码。

这里先谢谢！

1 Private Sub 增加_Click()

2 M_ctcs = 0

3 DoCmd.OpenForm "增加日期", acNormal, "", "", acAdd, acNormal

4 A = 1

5 End Sub

roych · 发表于 2011-7-9 19:12:04

Private Sub 增加_Click()
DoCmd.OpenForm "增加日期", acNormal, "", "", acAdd, acNormal
End Sub
2和4放在这段执行代码里根本就没有意义。一般来说，只要定义了变量或常量就应该用上，因此2和4可以删除（或者放在需要引用的程序里）。

sunyanjun · 发表于 2011-7-9 21:21:01

本帖最后由 sunyanjun 于 2011-7-9 21:28 编辑

1 Private Sub 增加_Click()
2 M_ctcs = 0
3 DoCmd.OpenForm "增加日期", acNormal, "", "", acAdd, acNormal
4 A = 1
5 End Sub
2楼谢谢你的关切！
2行、4行是示意行，实际编程时是有用的其他行。
我是想“示意”在关闭"增加日期"窗体后再执行第4行，这样咋编码。
哪位高手能帮我，谢谢！

aslxt · 发表于 2011-7-9 22:41:51

本帖最后由 aslxt 于 2011-7-9 22:45 编辑

DoCmd.OpenForm "增加日期", acNormal, "", "", acAdd, acNormal
修改最后一个参数为：acDialog

sunyanjun · 发表于 2011-7-10 00:12:37

回复 aslxt 的帖子

4楼，你的回答是正确的，非常感谢！

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] Access中打开窗体的代码问题，先谢谢！

群介绍
主题无相 (随机显示版	同地区群块其他地区)