运行时错误＆＃39; 3075＆＃39;：查询表达式Access中的语法错误（缺少运算符）

Question

查询表达式Run-time Error '3075': Syntax error (missing operator)

中的

Me.Subform_Search.Form.RecordSource = myorder

Private Sub order_type_AfterUpdate()                                      
Dim myorder As String
myorder = "Select * form Search Where ([order] = " & Me.order_type & ")"
Me.Subform_Search.Form.RecordSource = myorder
Me.Subform_Search.Form.Requery
End Sub

编辑加起来支架