选项卡切换，子窗体，searchforrecord问题

adcy　发表于：2012-08-30 13:18:25 　

选项卡控件下有2个页面
页1是产品列表搜索，点击结果转至页2的产品详情
页2里面是个子窗体A，然后这个子窗体里除了部分产品数据外，还有一个子窗体A1显示另一部分数据

Private Sub 搜索结果列表_Click()
Me.子窗体A.SetFocus
DoCmd.SearchForRecord , , , "ID =" & [搜索结果列表] & ""
End Sub

现在问题是，如果鼠标点了子窗体A1里面的控件，焦点停留在里面，那么再直接点选项卡切换回页1再点击搜索结果的话，事件就失效了，子窗体A不会更新记录

煮江品茶发表于：2012-08-30 17:41:25

马王爷只剩了一只眼，看了这里看不到那里。

心态哥发表于：2012-08-30 19:54:34

路过

dbaseIIIer 发表于：2012-08-31 14:56:58

看你是否允许鼠标点了子窗体A1里面的控件了！

不允许的话，其实可以用

set rs = Me.子窗体A.Form.Recordset

rs.findfirst "ID =" & [搜索结果列表] & ""

me!选项卡.Pages(2).activate

或者后台搜索

set rs = Me.子窗体A.Form.RecordsetClone

rs.findfirst "ID =" & [搜索结果列表] & ""

if rs.nomatch then

msgbox "未能找到！"

else

me.子窗体A.Form.Bookmark = rs.bookmark

me!选项卡.Pages(2).activate

endif

焦点是不会落入子窗体了

总记录：3篇页次：1/1 9 1 :

Access交流中心