选择字段总和最大的记录 (Access 2010)

Question

我想根据用户在表单上指定的字段“labcode”从表中选择一条记录。 每个“labcode”可能有多个记录，我想选择“tblDSA”中10个对应字段总和最高的记录。字段命名如下：“A1_MFI”、“A2_MFI”、“C1_MFI” ”、“C2_MFI”、“DR1_MFI”、“DR2_MFI”……）

所有 10 个字段都是“文本”格式，有时包含数字、文本或留空。 我只想总结在该字段中包含数字的记录。 我是否需要在“tblDSA”中创建一个新字段来保存总分，还是应该避免在表中存储计算值？

Dim SQL As String
Dim db As DAO.Database
Dim tblDSA As DAO.Recordset

Set db = CurrentDb

Set tblDSA = db.OpenRecordset("tblDSA")

   SQL = "SELECT * Nz((Val[A1_MFI])) + Nz((Val[A2_MFI])) + Nz((Val[B1_MFI])) + Nz((Val[B2_MFI])) +  Nz((Val[C1_MFI])) + Nz((Val[C2_MFI])) + Nz((Val[DR1_MFI]))+ Nz((Val[DR2_MFI])) + Nz((Val[DQB1_MFI] + Nz((Val[DQB2_MFI]))as TotalScore FROM tblDSA WHERE [LABCODE] = " & Me.tbLabcode.Value & " ORDER BY TotalScore DESC "


Debug.Print SQL

Set rs = db.OpenRecordset(SQL)

上面的 SQL 包含语法错误（缺少运算符），因此，我无法对其进行测试。 我不确定缺少什么？ Nz() 用于跳过空白记录，Val() 用于将每个文本字段转换为值。 请让我知道这是正确的方法还是我需要做其他事情？ 谢谢

Answer 1

看起来你有两件事

• 你在“SELECT *”之后没有命令
• 在您的新西兰声明之一中缺少两个括号

@PhillipXT 指出了第一个 - 通过使用他的第二个建议，我认为 SQL 编译器会为您指出缺少的括号。

用复制/粘贴试试这个

SQL = "SELECT *, Nz((Val[A1_MFI])) + Nz((Val[A2_MFI])) + Nz((Val[B1_MFI])) + _
Nz((Val[B2_MFI])) +  Nz((Val[C1_MFI])) + Nz((Val[C2_MFI])) + Nz((Val[DR1_MFI])) + _   
Nz((Val[DR2_MFI])) + Nz((Val[DQB1_MFI])) + Nz((Val[DQB2_MFI])) AS TotalScore _   
FROM tblDSA _      
WHERE [LABCODE] = " & Me.tbLabcode.Value & _    
" ORDER BY TotalScore DESC "   

Answer 2

好的，经过多次反复之后，这是适用于这个特定问题的最终结果：

SELECT TOP 1 *, (Nz(Val(IIf([A1_MFI] Is Null, 0, [A1_MFI]))) + Nz(Val(IIf([A2_MFI] Is Null, 0, [A2_MFI]))) + ...) AS TotalScore
FROM tblDSA
WHERE [LABCODE] = 57
ORDER BY (Nz(Val(IIf([A1_MFI] Is Null, 0, [A1_MFI]))) + Nz(Val(IIf([A2_MFI] Is Null, 0, [A2_MFI]))) + ...) DESC

我认为 Access 允许 ORDER BY 中的字段别名，但它似乎不再这样做了，如果它确实这样做的话。