子窗体搜索结果数据录入问题

over_fly111　发表于：2019-04-11 12:05:49 　

设计一个搜索窗体，搜索结果在子窗体显示。数据后续需要编辑，但是不想直接在子窗体中编辑。
想是，点击子窗体某个字段，弹出新窗体，进行数据录入变更。
问题是，弹出新窗体，显示的数据内容都是一样的，不随我点击子窗体字段内容而改变。
不知道是哪个链接或者代码写的不对，请教下应该怎么做，如有实例请提供，谢谢！

Top

over_fly111 发表于：2019-04-12 09:23:05

别沉啊

Top

江湖发表于：2019-05-17 19:12:23

张志老师的初级授课视频里有你所说的示例，http://www.accessoft.com/video_show.asp?ID=42 ,在子窗体的载入事件中，在一个新窗体中显示所选中的记录，进行修改，然后保存，修改成功。

Top

yuhong 发表于：2019-05-20 13:00:16

'以下放在你要双击的窗体里

Private Sub Form_Load()
    Dim ctr As Control
    For Each ctr In Me.Controls
        If ctr.Section = acDetail And ((TypeOf ctr Is TextBox) Or (TypeOf ctr Is ComboBox) Or (TypeOf ctr Is CheckBox)) Then
            ctr.OnDblClick = "=allDblClick()"
        End If
    Next
end sub

'采用的是双击打开商品表，自己可以修改为单击，你的问题应该是查询的部分没有弄对，你参考下面的代码改一下，Me.项目名称是你双击的窗体上的控件，商品表是你双击后打开的窗体。
Private Function allDblclick()
      Dim bb As String
      Dim aa As Date
      bb = Me.业务员姓名
      aa = Me.变动时间
DoCmd.OpenForm "商品表", acFormDS, , "项目名称='" & Me.项目名称 & "'and 业务员姓名 ='" & Me.业务员姓名 & "' and 变动时间 = # " & 变动时间 & "# "
   Me.Refresh
end function

Top

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

Access交流中心

子窗体搜索结果数据录入问题