如何在MS Access中通过组合框选择字段执行查询

Let's break down why your current SQL isn't working, then walk through the correct solutions.

The Root Problem #

Your SQL statement SELECT FORMS![formName]!cboName FROM tblName; is treating the combo box value as a static text string, not as a field name. For example, if your combo box is set to "CustomerID", this query will return a column full of the text "CustomerID" (not the actual values from the CustomerID field in tblName) — which is why you're seeing no meaningful data.

Solution 1: Use VBA to Build Dynamic SQL (Recommended) #

The most reliable way to reference a dynamically selected field is to construct your SQL string in VBA, replacing the combo box value with the actual field name. Here's how to do this, say, in a button's click event:

Private Sub btnRunQuery_Click()
    Dim targetField As String
    Dim sqlString As String
    
    ' Grab the selected field name from the combo box
    targetField = Me.cboName.Value
    
    ' Guard against empty selections
    If IsNull(targetField) Then
        MsgBox "Please select a field first!", vbExclamation
        Exit Sub
    End If
    
    ' Build the SQL (wrap field name in brackets to handle spaces/special characters)
    sqlString = "SELECT [" & targetField & "] FROM tblName;"
    
    ' Execute the query — adjust this based on what you need to do
    ' Option 1: Open the query in Datasheet view
    DoCmd.OpenQuery sqlString
    ' Option 2: Work with the recordset programmatically
    ' Dim rs As Recordset
    ' Set rs = CurrentDb.OpenRecordset(sqlString)
End Sub

The square brackets [] around the field name are critical here — they prevent errors if your field names have spaces, special characters, or match Access reserved words (like "Date" or "Name").

Solution 2: Use Eval in a Query (Not Recommended for Public Apps) #

If you want to avoid VBA, you can use the Eval function to parse the combo box value as a field name. However, this carries a small SQL injection risk (if untrusted users can modify field names) and is less performant:

SELECT Eval(FORMS![formName]!cboName) AS SelectedFieldData FROM tblName;

Only use this if you're the only one using the database and trust the field names in your combo box.

Quick Checks to Avoid Other Issues #

• Double-check your combo box's Bound Column: Make sure the BoundColumn property is set to the column that contains your field names (usually 1, if your combo box's RowSource is just a list of field names).
• Verify field name matches: Ensure the combo box's values exactly match the field names in tblName (case doesn't matter in Access, but spelling does).

内容的提问来源于stack exchange，提问作者Anders Narita