from 子语句语法错误

jonah781181 · 发表于 2013-7-13 14:11

Private Sub staDate_Change()
On Error GoTo err_staDate_Change
Dim strDat As String
strDat = "WHERE [出库日期] Between [Forms]![出库历史查询]![staDate] And Date$()"
[Forms]![出库历史查询].mainFrm.Form.RecordSource = "SELECT * FROM 出库单历史" & strDat
exit_staDate_Change:
Exit Sub
err_staDate_Change:
MsgBox Err.Description
Resume exit_staDate_Change
End Sub

如上的VB语句
运行到
[Forms]![出库历史查询].mainFrm.Form.RecordSource = "SELECT * FROM 出库单历史" & strDat
提示 from 子语句语法错误。
估计是 strDat = "WHERE [出库日期] Between [Forms]![出库历史查询]![staDate] And Date$()" 写法有误，
但是发现不了错误。
请高手指教！

jonah781181 · 发表于 2013-7-13 14:33

老师在吗？？？请教！

竹笛 · 发表于 2013-7-13 15:05

where 前面加个空格 "WHERE [出库日期] Between #“& [Forms]![出库历史查询]![staDate] &”# And #“& Date$() &”#"

jonah781181 · 发表于 2013-7-13 15:15

哦！谢谢老师！
原来我把前面的空格给漏了！
再次感谢！

		自动登录	找回密码
密码			免费注册

[求助] from 子语句语法错误