1

我一直在处理一个包含 2 个组合字段和一个文本字段的表单。我希望文本框显示查询结果。查询从两个组合框中获取值。我能够形成查询,但无法在文本框中获取其值。该查询生成单个值(1 行,1 列)。请帮助我或指出我可以找到解决方案的任何好的资源。

4

1 回答 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 回答