如何在MS Access中模拟LEAD()窗口函数？

问题分析 #

你当前的查询逻辑存在核心错误：关联子查询通过MatKey的大小关系取min(m12.MatKey)，但这和你需要的按Station升序排序后的下一行没有直接关联——MatKey的顺序与Station的顺序不匹配，且MatKey存在重复值，导致无法正确定位到排序后的下一行数据，甚至出现m2lead为空的情况。

解决方案 #

由于MS Access不支持LEAD()窗口函数，我们可以通过生成行号+自关联的方式实现需求：先给每条记录按Station升序（若Station相同则按Id升序，保证排序唯一）分配行号，再关联行号+1的记录来获取下一行的MatKey。

具体SQL语句 #

SELECT 
    q1.Point_No, 
    q1.MatKey, 
    q2.MatKey AS m2lead,
    q1.PID, 
    q1.Station, 
    q1.Eqstation, 
    q1.SlopeStation, 
    q1.Id
FROM 
    (
        -- 生成带行号的基础数据集，按Station升序、Id升序排序
        SELECT 
            m1.Point_No, 
            m1.MatKey, 
            m1.PID, 
            m1.Station, 
            m1.Eqstation, 
            m1.SlopeStation, 
            m1.Id,
            DCount("*", "tblMagicTwo", "Station < " & m1.Station & " OR (Station = " & m1.Station & " AND Id < " & m1.Id & ")") + 1 AS RowNum
        FROM tblMagicTwo AS m1
    ) AS q1
LEFT JOIN 
    (
        -- 同样生成带行号的数据集，用于关联下一行
        SELECT 
            m2.MatKey,
            DCount("*", "tblMagicTwo", "Station < " & m2.Station & " OR (Station = " & m2.Station & " AND Id < " & m2.Id & ")") + 1 AS RowNum
        FROM tblMagicTwo AS m2
    ) AS q2 ON q1.RowNum + 1 = q2.RowNum
ORDER BY q1.Station ASC;

逻辑说明 #

1. 生成行号：使用DCount()函数统计当前记录之前（Station更小，或Station相同但Id更小）的记录数，加1得到当前行的行号RowNum，确保排序顺序严格符合你的需求。
2. 自关联获取下一行：将带行号的数据集自关联，通过q1.RowNum + 1 = q2.RowNum定位到排序后的下一行，取出其MatKey作为m2lead；使用LEFT JOIN保证最后一行的m2lead为空（符合LEAD()的默认行为）。

内容的提问来源于stack exchange，提问作者J2112O