任何想法爲什麼我在運行此代碼時會收到「輸入參數值」輸入框?組合框單擊按鈕時出現「輸入參數值」提示
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。
它仍然給我相同的結果 –
報告的來源是什麼 - 它是一個查詢嗎?查詢上是否有名爲「Combo_1」的字段? – AdzzzUK
該源是一個查詢,它沒有名爲Combo_1的字段。 Combo_1在查詢中的列1中下拉列表,然後我有2個文本框填寫列2和3.組合框是無界的,因此我可以使用下拉菜單並且不能編輯它。 –