vba 字符串问题？

花花　发表于：2015-10-27 08:05:04 　

SQL查询为：

INSERT INTO 课时统计 ( 科目, 课时统计, 班级ID )

SELECT First(周课表.[高二(2)]) AS 科目, Count(周课表.[高二(2)]) AS 课时统计, "高二(2)" AS 班级ID
FROM 周课表
GROUP BY "高二(2)", 周课表.[高二(2)]

HAVING (((Count(周课表.[高二(2)]))>=1));

想在

Private Sub bt_Click()
    Dim strSQL As String
    strSQL =
    DoCmd.RunSQL strSQL
End Sub

换成 str 串执行，老是出错，请教大侠们如何改写？

另想通过一循环，共10个班级，一下追加到课时统计，该如何编写？

Top

缪炜发表于：2015-10-27 08:31:06

strSQL="INSERT INTO 课时统计 ( 科目, 课时统计, 班级ID ) " _
&" SELECT First([高二(2)]) AS 科目, Count([高二(2)]) AS 课时统计, '高二(2)' AS 班级ID FROM 周课表 " _
& " GROUP BY '高二(2)', First([高二(2)]) " _
& " HAVING Count([高二(2)])>=1"

Top

杜超发表于：2015-10-27 12:59:08

ACCESS一行代码太长,如何加换行符号\连接符号[Access软件网]
http://www.accessoft.com/article-show.asp?id=7763

Top

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

Access交流中心

vba 字符串问题？