Question

I have been working on a form which has 2 combo fields and one text field. I want the textbox to show the result of a query. The query takes values from both the combo boxes. I was able to form the query but not able to get its value in textbox. The query produces a single value (1 row, 1 column). Please help me or point me to any good resources where I can find the solution.

Answer 1

Text boxes don’t have a recordsource like a combobox, you can set them to equal the result of a function though, something like this:

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

Then you can set your textbox’s Control Source property to =CountChildData()