VBA代码错误

菜鸟　发表于：2014-09-24 16:23:15 　

请老师帮忙看一下这段代码

Option Compare Database

Private Sub Command1_Click()
Me.WIN_ML.Form.RecordSource = "select * from ml where ml_dd=' & Me.ml_dd &' "

End Sub

为什么总是提示错误？

ML-dd是时间/日期数据类型

麥田发表于：2014-09-24 16:41:32

Me.WIN_ML.Form.RecordSource = "select * from ml where ml_dd=#' & Me.ml_dd & '#"

麥田发表于：2014-09-24 16:42:08

【Access扫盲知识】声明模块变量的用法,变量符号用法,文本型变量.日期型变量,数字型变量,数值型变量的符号表示法[Access软件网]
http://www.accessoft.com/article-show.asp?id=8013

cspa 发表于：2014-09-24 16:45:52

麦田老师也错了

Me.WIN_ML.Form.RecordSource = "select * from ml where [ml_dd]=#" & Me.[ml_dd] & "#"

注：ml_dd中因有“_”最好用[]括起来，否则也可能报错。

菜鸟发表于：2014-09-24 17:28:14

还是不行啊！

cspa 发表于：2014-09-25 08:29:56

这样试试：

Me.[WIN_ML].Form.RecordSource = "select * from ml where [ml_dd]=#" & Me.[ml_dd] & "#"

再不行，把你的错误提示贴上来看看，便于定位错误。

芊芊发表于：2014-09-25 08:31:18

ML-dd是时间/日期数据类型,看看表是否有匹配的数据,改成日期型试试.

总记录：6篇页次：1/1 9 1 :

Access交流中心