主题：过产品编号查询 时间（起始和结束）？？

Dim Filter As String

With e.Form.Controls("TextBox1")
    If .Value IsNot Nothing Then
        Filter = "产品编号= '" & .Value & "'"
    End If
End With