求助，代码寻找错误

qp370982

求助，代码寻找错误下面这段代码在语法上有错误，请各位老师帮忙改正
Dim str As String
If 曾经接受过的教育.Value = "" And 身份.Value = "" And 毕业形式.Value = "" Then
str = ""
Else
str = "select * form 档案 where 编号 in (select 编号 form 履历 where 曾经接受过的教育 = '" & Trim(曾经接受过的教育.Value) & "' and 身份 = '" & Trim(身份.Value) & "' and 毕业形式 = '" & Trim(毕业形式.Value) & "')"
档案子窗体.Form.RecordSource = str
End If
我想错误应在红色的部分，先谢了

ycxchen

应是3楼说的吧

zyp

select * form 档案
select 编号 form 履历

不是form 而是FROM

asklove

感觉你这个STR是先做个查询，然后把SQL粘贴过来的吧。
如果你这个查询没问题的话，那就换行格式的问题了。
str = "select * form 档案" & _
　　　" where 编号 in (select 编号 form 履历" & _
      " where 曾经接受过的教育 = '" & Trim(曾经接受过的教育.Value) & "' " & _
         " and 身份 = '" & Trim(身份.Value) & "' " & _
         " and 毕业形式 = '" & Trim(毕业形式.Value) & "')"