为何查询时总是说“至少一个参数没有被指定”？？？？？？

查询的源代码为：

Private Sub Command3_Click()
conn.CursorLocation = adUseClient
conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\xldx.mdb;"

'nPageSize = Text2.Text
'建立Recordset对象
Set RS = New ADODB.Recordset
strSql = "select * from xldx材料 where 电算代号 like " & Text2.Text & " order by 电算代号" '以电算代号为序排列
RS.Open strSql, conn, adOpenStatic, adLockOptimistic
', 1 '因为要分页显示，所以用键盘指针
End Sub