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