1

私は2つのコンボフィールドと1つのテキストフィールドを持つフォームに取り組んでいます。テキストボックスにクエリの結果を表示したい。クエリは、両方のコンボボックスから値を取得します。クエリを作成できましたが、テキストボックスでその値を取得できませんでした。クエリは単一の値（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

次に、テキストボックスのControlSourceプロパティを=CountChildData（）に設定できます。

于 2012-12-06T12:31:21.613 に答える