不必要的輸入參數值消息框

Question

我有一個打開報告的按鈕。我在「where」子句中有一條語句，僅顯示與當前表單中某個字段中的位置相匹配的ToteLocation。這裏是代碼：

Private Sub   
    cbTruckorder_Click() 
    Dim stdocname As Stringstdocname = "TruckLoadingReport" 
    ' setting focus to ScannerRead in order to continue operations 
    '  (see Command22) 
    Me.tbScannerRead.SetFocus 
    ' opening the Truck Loading Report 
    DoCmd.OpenReport stdocname, acViewPreview, , "[Tote Log].ToteLocation =" & _ 
                  Me.tbScannerRead 
End Sub 

我得到一個消息框，要求參數值。在框中它顯示了Me.tbScannerRead的值。例如：T265。該報告非常簡單，在頁眉中有totelocation文本框，信息按批號分組，在批號標題中有一個批號的文本框。我的詳細信息，我有手提袋數字文本框，就是這樣，僅此而已。

如果我在參數值中放入值（T265），它會顯示報告，但我需要參數值框消失，任何人的建議都會很好。

謝謝

下面是報告的SQL：

SELECT [Tote Log].Type, 
     [Tote Log].Number, 
     [Tote Log].ToteLocation, 
     [Lot Number].Lot 
FROM [Tote Log] INNER JOIN [Lot Number] 
     ON [Tote Log].[Lot Number] = [Lot Number].ID; 

Answer 1

Private Sub   
    cbTruckorder_Click()  
    Dim stdocname As Stringstdocname = "TruckLoadingReport"   
    ' setting focus to ScannerRead in order to continue operations 
    '  (see Command22) 
    Me.tbScannerRead.SetFocus 
    ' opening the Truck Loading Report 
    DoCmd.OpenReport stdocname, acViewPreview, , "[Tote Log].ToteLocation ='" & _ 
                 Me.tbScannerRead & "'" 
End Sub 

我不記得他的姓，但謝謝你傑夫它真的幫助。我添加了單引號，但在ME.tbScannerRead後取出了.text。再次感謝