我一直在处理一个包含 2 个组合字段和一个文本字段的表单。我希望文本框显示查询结果。查询从两个组合框中获取值。我能够形成查询,但无法在文本框中获取其值。该查询生成单个值(1 行,1 列)。请帮助我或指出我可以找到解决方案的任何好的资源。
问问题
22759 次
1 回答
6
文本框没有像组合框那样的记录源,您可以将它们设置为等于函数的结果,如下所示:
Public Function CountChildData()
Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("SELECT Count(childid) AS Result FROM ChildData WHERE formid = " & Me.cmbFormid & "")
CountChildData = rs!Result
rs.close
set rs = nothing
End Function
然后您可以将文本框的Control Source属性设置为 =CountChildData()
于 2012-12-06T12:31:21.613 回答