主题：日期的季度和周的selec语句如何写（OK）

你不能直接将SQL语句写成：

SELECT Year(日期) AS 年, DatePart('q', 日期) AS 季度, DatePart('ww', " & c & " ) AS 周 FROM {订单}

这是代码，你的用代码解决：

Dim s As string  = "SELECT Year(日期) AS 年, DatePart('q', 日期) AS 季度, DatePart('ww', " & c & " ) AS 周 FROM {订单}"

然后将s赋值给需要调用这个seect语句的立方，例如：

cmd.CommandText  = s

或：

Tables("xxx").Fill(s, ....)

把 q 的单引号去掉

你还是没有把单引号去掉

DatePart(Interval, date)

的Interval是不需要单引号的

你这个图片对于解决你的问题没有任何意义。

既然怀疑合成的sql语句有问题，你就用output.show将很成的sql语句显示到命令窗口，然后复制这个sql语句到sql执行窗口执行调试分析，或者贴出你合成的语句给大家看。

另注意如果你的是sql server，q,w这些是不需要单引号的。