组合框在单击按钮时出现"Enter Parameter Value"提示

Question

运行此代码时为什么要获得"输入参数值"输入框的任何想法？

Private Sub cmdPrint_Click()
    Dim str As String
    On Error GoTo ErrHandler
    If IsNull(Me.Combo_1) Then
        MsgBox "Can't print an unsaved record", _
        vbOKOnly, "Error"
        Exit Sub
    End If
    str = "Combo_1 = '" & Me!Combo_1 & "'"
    Debug.Print str
    DoCmd.OpenReport "rptBarCodeLabels(2)", acViewPreview, , str
    Exit Sub
ErrHandler:
    MsgBox Err.Number & ": " _
    & Err.Description, vbOKOnly, "Error"
End Sub

编辑：该按钮用于打印Combo_1中当前选择的标签。单击打印按钮后，我希望它显示我参考的标签报告中选择的单一记录。我正在使用Access 2003，如果这意味着什么。

Answer 1

如果查询中的字段名称包含标点符号(combo_1(，则应将其包裹在括号中，例如：

str = "[Combo_1] = '" & Me!Combo_1 & "'"

该报告期望参数，但由于没有以正确的方式通过。

Answer 2

我通过使用此处提供的一些编码找到了解决方案：标签for-a-single-access record/

解决错误最有可能创建临时表和临时报告。