Office中国论坛/Access中国论坛

标题: 将查询结果显示在子窗体 [打印本页]

作者: qq245009518 时间: 2011-8-16 13:37
标题: 将查询结果显示在子窗体
创建了一个窗体：有一个未绑定文本控件、一个按钮控件、一个未绑定子窗体，我在文本框输入内容，点击按钮，将包含文本框内容查询结果在子窗体以数据表的形式显示。出现错误提示“运行时错误’2467‘您输入的表达式应用了一个关闭或不存在的对象”，而且子窗体也无结果显示
按钮Click事件语句：
If Trim(Me.Text0.Value) = "" Then Child4.Form.RecordSource = "SELECT * FROM 客户信息" Else Child4.Form.RecordSource = ("SELECT * FROM 客户信息 WHERE 客户信息.企业名称 Like '" & Me.Text0.Value & "'")

附测试文档
[attach]46435[/attach]

作者: roych 时间: 2011-8-16 20:29
子窗体应先绑定数据源（客户信息），此外，对于你窗体代码，我稍稍优化了下，供参考：

Private Sub Command0_Click()
If Trim(Me.Text0.Value) = "" Then
Child4.Form.RecordSource = "客户信息"
Child4.Form.Recalc
Else
Child4.Form.RecordSource = "SELECT * FROM 客户信息 WHERE 客户信息.企业名称 Like '*" & Me.Text0.Value & "*'"
Child4.Form.Recalc
End If
End Sub

复制代码

作者: trulyzeng 时间: 2011-8-16 21:54
回复 roych 的帖子

THANKS A LOT

作者: jinzhanxi 时间: 2011-8-17 08:16
谢谢分享

作者: qq245009518 时间: 2011-8-17 09:38
回复 roych 的帖子

经过测试，roych版主方法十分有效，代码更加简明，非常感谢roych版主。

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