设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 3762|回复: 4
打印 上一主题 下一主题

[窗体] 打开新窗体,添加新记录

[复制链接]
跳转到指定楼层
1#
发表于 2003-4-29 00:59:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我在一个叫“员工资料”的窗体中有一个下拉列表框,其中有“所属公公司”,当要打开"分公司信息输入面板",增加一个分公司时,用下面的命令
DoCmd.OpenForm "分公司信息输入面板", , , , , acDialog, "gotonew"
结果:不行,在第一个记录处
docmd.OpenForm "分公司信息输入面板",,,,acFormAdd ,,,,可以,可看不到其它原有的记录
可以用
docmd.GoToRecord ,,acNewRec
但要在新打开的窗体即:"分公司信息输入面板", 中用这个命令,在“员工资料”中用docmd.openform 怎么样处理呀?
先谢呢



[此贴子已经被作者于2003-4-28 17:33:08编辑过]

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2003-4-29 04:59:00 | 只看该作者
在窗体"分公司信息输入面板"的加载事件中:
Private Sub Form_Load()
   DoCmd.GoToRecord , , acNewRec
End Sub

试试啦~~~
3#
 楼主| 发表于 2003-4-29 18:01:00 | 只看该作者
问题是:
有时我打开“"分公司信息输入面板”时不会增加新记录的,可以通过定义一个全局变量来实现。但未免复杂,想寻求一个更简单,有效的方法
谢谢你

点击这里给我发消息

4#
发表于 2003-4-29 20:15:00 | 只看该作者
用OpenForm 的最后一个参数来控制你在不同地方打开时的要求。
5#
 楼主| 发表于 2003-5-5 08:29:00 | 只看该作者
传递一个"gotonew"(当然可以是其它),在打开要添加记录的窗体中加判断语句:
If Me.OpenArgs = "GotoNew" And Not IsNull(Me![联系人ID]) Then
  DoCmd.GoToRecord , , acNewRec
End If
谢谢
其实就是飘然姐的方法,只是增加了一个判断的变量而已
谢谢飘然姐
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-26 02:24 , Processed in 0.111744 second(s), 28 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表