2

テーブル名は同じままですが、フィールド名は用途ごとに異なる同じデータベースで作業しています。ユーザーがコマンドボタンをクリックしてテーブル内のフィールドのリスト（「Scrubbed」という名前）を表示し、リストからフィールドを選択すると、すぐにウィンドウが開いて表示されるオプションをメインフォームに作成したいと思います。個別のフィールド値。これはできますか？

4

1 に答える 1

1

その場でクエリを作成するなど、VBAで多くのことができます。コンボボックスとリストボックスには、テーブル内のフィールドを一覧表示するRowSourceオプションのフィールドリストがあります。

編集

いくつかの変更を加えたコードは次のとおりです。

Private Sub Command206_Click()
Dim strSQL As String
Dim strScrubbedValue As String

   ''I suspect this is running in the form, so Me
   strScrubbedValue = Me.ComboListScrubbedFields

   ''Where the table is called Scrubbed
   strSQL = "SELECT DISTINCT " & strScrubbedValue & " FROM Scrubbed"

   ''No need to execute, it is just a row source
   ''DoCmd.RunSQL strSQL

   Me.Combo213.RowSource = strSQL
End Sub

コントロールに意味のある名前を付けることをお勧めします。

于 2012-07-10T16:08:00.117 に答える