SOS,一个简单的问题，解答后马上得分！

Question

TIME1=#" & cdate(TIMESTRING) & "#
試試

Answer 1

变量类型不对！DIM TIMESTRING  AS  Date
要求表中的相对字段也是日期型的，
按你写的，其中CHEHAO应该是数字型字段

Answer 2

这是我程序中的一行代码，不是很漂亮，但解决问题：
mcmdBill.CommandText = "SELECT * FROM Dat WHERE ((PayStatus LIKE '" & gstrPayFinish & "') AND (((Format([PayDate],'yyyy-mm-dd')) Like '" & Format(tdbdStat.Value, "yyyy-mm-dd") & "'))) ORDER BY Dat.PayID"

Answer 3

加对单引号就可以了!
CN.EXECUTE "DELETE  *  FROM  TABLE  WHERE  TIME1='" & TIMESTRING & "' AND CHEHAO='9999'"