提问人:teri bridges 提问时间:11/10/2023 最后编辑:Abderrahmene Rayene Mihoubteri bridges 更新时间:11/11/2023 访问量:72
如何创建查询来对值求和并在数据库中获取总计?
How can I create a query to sum values and obtain a total in my database?
问:
我有一个查询,将我的课程持续时间合计,以便为我提供课程时间。我在编写代码以提取记录集时遇到问题。
我得到的结果,使用我试图学习编写的代码,似乎对查询中的行数进行计数,但没有获得 LessonDuration 总和的值。
Function Cduration() As Integer
Dim SQL As String
Dim dbs As Database, rst As Recordset
SQL = "SELECT Course_tbl.CatalogID, Sum(Lessons_tbl.LessonDuration) AS [Course Duration] " & _
"FROM (ListModule_tbl INNER JOIN Course_tbl ON ListModule_tbl.[ModuleID] = Course_tbl.[ModuleID]) " & _
"INNER JOIN Lessons_tbl ON Course_tbl.[CourseID] = Lessons_tbl.[CourseID] " & _
"GROUP BY Course_tbl.CatalogID;"
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset(SQL)
Cduration = rst.Fields(1)
rst.Close
End Function
答: 暂无答案
评论
DLookup("[Course Duration]", "qryCourseDuration")