sql - VBA Access SQL SELECT 查询只返回一条记录

Question

我在 Access 2010 中使用 VBA，但遇到了一个奇怪的问题。我正在尝试从表中提取记录，但我的 SELECT 查询只返回一条记录。

表中有3条记录，但记录集只取到第一条。

这是我的代码。

Dim cc As String 
Dim DB As Database 
Dim rst As recordset 
Dim sqlstr As String 
Dim e As Integer 

cc = CmbClass.Text
If cc = "" Then Exit Sub 

sqlstr = "SELECT * FROM Students" 'WHERE CCode ='" & cc & "'"

Set DB = CurrentDb 
Set rst = DB.OpenRecordset(sqlstr) 
'Debug.Print rst.Fields(0)
e = rst.RecordCount 
Debug.Print e 
If e = 0 Then Exit Sub

e 的值一直是 1，而不是 3。如您所见，我最初有一个更复杂的 SQL 字符串，但我在尝试排除故障时将其简化为最基本的，但问题仍然存在。有谁知道为什么会这样？

谢谢，

谭。

Answer 1

从内存中你需要发出一个 rst.MoveLast 才能像这样可靠地获取记录数:

sqlstr = "SELECT * FROM Students" 'WHERE CCode ='" & cc & "'"

Set DB = CurrentDb 
Set rst = DB.OpenRecordset(sqlstr) 
rst.MoveLast
e = rst.RecordCount 

您可能还需要考虑使用 SELECT COUNT(*) FROM Students 并从记录集中读取值，而不是通过记录来获取计数。使用此查询应该更有效。