When you use the BuildCriteria method to programmatically set the Filter property on a form and the Field argument of the BuildCriteria method references a field name that contains a space, you may receive the following error message:
Run-time error '2448':
You can't assign a value to this object.
The BuildCriteria method is used to generate a parsed criteria string as it would appear in the Query by Example (QBE) grid or in Filter By Form mode. Unlike the QBE grid or Filter By Form, however, the BuildCriteria method does not automatically enclose the field name within brackets.
To resolve this behavior, enclose the Field argument of the BuildCriteria method within brackets. For example, using the example in step 2 of the "Creating the Module" section of the "Steps to Reproduce Behavior" section later in this article, change the following expression from:
NOTE: The sample code in this article uses Microsoft ActiveX Data Objects. For this code to run properly, you must reference the Microsoft ActiveX Data Objects 2.x Library (where 2.x is 2.1 or later.) To do so, click References on the Tools menu in the Visual Basic Editor, and make sure that the Microsoft ActiveX Data Objects 2.x Library check box is selected.
On the Insert menu, click Module.
Add the following function to the module:
'******************************************************************
' This procedure opens a form and applies a filter.
'******************************************************************
Sub SetFilter()
Dim frm As Form, strMsg As String
Dim strInput As String, strFilter As String
' Open Products form in Form view.
DoCmd.OpenForm "Products"
' Return Form object variable pointing to Products form.
Set frm = Forms!Products
strMsg = "Enter one or more letters of product name " & _
"followed by an asterisk."
' Prompt user for input.
strInput = InputBox(strMsg)
' Build criteria string.
strFilter = BuildCriteria("Product Name", adBSTR, strInput)
' Set Filter property to apply filter.
frm.Filter = strFilter
' Set FilterOn property; form now shows filtered records.
frm.FilterOn = True
End Sub
To test this procedure, type the following line in the Immediate window, and then press ENTER:
SetFilter
Note that the Products form is displayed, followed by an Input box requesting the search criteria.
Type A* and click OK. Note that you receive the error message:
Run-time error '2448':
You can't assign a value to this object.
For more information about using the BuildCriteria method, in the Visual Basic Editor, click Microsoft Visual Basic Help on the Help menu, type BuildCriteria method in the Office Assistant or the Answer Wizard, and then click Search to view the topic.