Office中国论坛/Access中国论坛

标题: 如何实现双击某条记录，自动打开一个窗体对该记录进行编辑？ [打印本页]

作者: 踏网寻花 时间: 2002-11-26 23:55
标题: 如何实现双击某条记录，自动打开一个窗体对该记录进行编辑？
如何实现双击某条记录，自动打开一个窗体对该记录进行编辑？

我跟据本站上面“模糊查询设计示例”这个例子写了一个查询的窗体，如何在列表框上双击某条记录来开一个窗体对该记录进行修改？
谢谢！

作者: zhengjialon 时间: 2002-11-27 00:33
在双击事件过程中用DoCmd.OpenForm "formname", , , , acFormAdd
这个formname要另做一个窗体。

作者: 踏网寻花 时间: 2002-11-27 01:00
怎么不行呢。我用DoCmd.OpenForm "formname", , , , acFormAdd好像是新建了一条记录吧？
我想要的是编辑我所双击的那一行记录。

作者: zhengjialon 时间: 2002-11-27 01:21
是的我打错了用acFormAdd换成acFormEdit。

作者: 踏网寻花 时间: 2002-11-27 16:28
这一次是可以编辑了，但是每次双击后是编辑数据表的第一条纪录呀。
我的意思是在列表中，我双击那一条就编辑那一条。

作者: herdsboy 时间: 2002-11-27 16:45
DoCmd.OpenForm FormName, , ,关联条件, acFormEdit
这个关联条件必须有才能打开所选记录

作者: 踏网寻花 时间: 2002-11-27 17:00
这个表达式应该怎么写呀，给点提示好不好？大哥

作者: guotianxin 时间: 2002-11-27 17:06
If Not IsLoaded(窗体名) Then
         DoCmd.openForm "窗体名"
      End If
      DoCmd.SelectObject acForm, "窗体名"
      DoCmd.GoToControl Forms![窗体名]![关键字名].Name
      DoCmd.FindRecord Me![关键字名]
      DoCmd.GoToControl Forms![窗体名]![关键字名].Name

如：
      If Not IsLoaded("Tickets") Then
         DoCmd.openForm "Tickets"
      End If
      DoCmd.SelectObject acForm, "Tickets"
      DoCmd.GoToControl Forms![Tickets]![ControlNo].Name
      DoCmd.FindRecord Me![ControlNo]
      DoCmd.GoToControl Forms![Tickets]![ControlNo].Name
用户在浏览机票的窗体上双击ControlNo，自动打开Tickets窗体，并使用FindRecord功能找到该ControlNo。

说明：
isloaded()函数判断窗体是否已经打开。
前面一条提到的方法 DoCmd.OpenForm FormName, , ,关联条件, acFormEdit
，只适用于编辑窗体未打开的时候。

作者: huanghai 时间: 2002-11-27 17:15
标题: 我的例子，应该可以用。
文件下载

作者: 踏网寻花 时间: 2002-11-27 17:40
我在“查找数据“窗口中用的是列表框来列表数据，我需要的是在列表框上列表的数据上双击某一条纪录的时候，打开一个窗体来编辑。
谢谢

作者: 踏网寻花 时间: 2002-11-27 18:02
标题: 图
看看这个图吧。多谢各位了！

作者: herdsboy 时间: 2002-11-27 18:45
服了你了，有这么多时间来问
看书看帮助早解决了
人要靠自己，别人是靠不住的
看例子
文件下载

祝好运！

作者: 踏网寻花 时间: 2002-11-27 18:59
呵呵，大哥。
搞定谢谢你们大家了

作者: gaofei186 时间: 2008-4-5 14:02
kkkkkkkkkkkkkkkkkkkkkkkkkkk

作者: TNHTJ 时间: 2011-4-20 14:51
太好了，找了很久，终于解决了

作者: dreamtao 时间: 2011-7-30 09:59
我也是相同的问题,附件都没有了.怎么办呢.

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